CONVERSION A EUROS

Form

Desarrollo

Inicia Visual Basic y elije crear un proyecto EXE estandar. Añade al formulario del proyecto las etiquetas que ves en la imagen: Conversión a euros Pesetas Euros Label2 y el CommandButton con el campo Caption cambiado a: CONVERTIR A EUROSPara cambiar los colores y el fondo de un control Label debes cambiar los campos BackColor y ForeColor (color del fondo y del primer plano) de estos objetos. Igualmente puedes cambiar el tipo de letra, seleccionándola en el campo Font de la ventana Propiedades del control. En este ejemplo tienes que modificar TAMBIEN el nombre de los controles: Llama al control TextBox Pesetas y a la etiqueta Label2: Euros, modificando el campo (Nombre) de estos controles.

Al botón de comando ponle como nombre Convertir y en su campo Caption escribe: CONVERTIR A EUROS. Ahora podemos introducir código de programa en el botón, para que al pulsarlo ejecute nuestras instrucciones. Haz doble click sobre el botón y Visual Basic te mostrará el comienzo y el final de la subrutina correspondiente a Hacer Click. Añade el código siguiente:

Euros.Caption = Pesetas.Text / 165 Esta instrucción se encargará de dividir el contenido del control de texto por 165 para obtener el resultado en euros. Para ir a la ventana de código, en caso de que quede oculta por otra, puedes pulsar el icono Ver código que hay en la parte superior de la ventana Proyecto. Ya puedes ejecutar el programa.