Console.WriteLine("SELECCIONE OPCION DEL MENU: ")
Console.WriteLine("1. CONVIERTE A KILOGRAMOS")
Console.WriteLine("2. CONVIERTE A ONZAS")
Console.WriteLine("3. CONVIERTE A QUINTALES")
Console.WriteLine("4. CONVIERTE A ARROBAS")
OPCION = CONSOLE.ReadLine()
DIM LIBRAS, KILOGRAMOS AS DOUBLE
CONSOLE.WriteLine("INGRESE UNA CANTIDAD EN LIBRAS: ")
LIBRAS = CONSOLE.ReadLine()
KILOGRAMOS = LIBRAS / 2.2
CONSOLE.WriteLine(" LA CONVERSION ES:" &KILOGRAMOS &" Kg")
DIM LIBRAS, ONZAS AS DOUBLE
CONSOLE.WriteLine("INGRESE UNA CANTIDAD EN LIBRAS: ")
LIBRAS = CONSOLE.ReadLine()
CONSOLE.WriteLine(" LA CONVERSION ES:" & ONZAS &" Oz")
DIM LIBRAS, QUINTALES AS DOUBLE
CONSOLE.WriteLine("INGRESE UNA CANTIDAD EN LIBRAS: ")
LIBRAS = CONSOLE.ReadLine()
CONSOLE.WriteLine(" LA CONVERSION ES:" &QUINTALES &" qq")
DIM LIBRAS, ARROBAS AS DOUBLE
CONSOLE.WriteLine("INGRESE UNA CANTIDAD EN LIBRAS: ")
LIBRAS = CONSOLE.ReadLine()
CONSOLE.WriteLine(" LA CONVERSION ES:" &ARROBAS &" @")