Lenguajes Visual Basic

El comando Option Explicit sirve para obligar a declarar todas las variables que se utilicen. Esto impide el cometer errores en los nombres de las variables (confundir masa con mesa, por ejemplo).Declarar una variable es crearla con un nombre y de un tipo determinado antes de utilizarla.
Option Explicit
Private Sub Form_Load()
txtCaja.Top = 0
End Sub
Private Sub optArriba_Click()txtCaja.Top = 0
End Sub
Private Sub optAbajo_Click()
txtCaja.Top = frmColores0.ScaleHeight - txtCaja.Height
End Sub
Private Sub optAzul_Click()
txtCaja.BackColor = vbBlue
End Sub
Private SuboptRojo_Click()
txtCaja.BackColor = vbRed
End Sub
Private Sub optVerde_Click()
txtCaja.BackColor = vbGreen
End Sub
Private Sub optAmarillo_Click()
txtCaja.BackColor = vbYellow
End Sub

Recuérdese quesi se desea que el código de todos los eventos aparezca en una misma ventana hay que activar la opción Default to Full Module View en la solapa Editor del comando Tools/Options.

En este ejemplo seha utilizado repetidamente la función Val() de Visual Basic. Esta función convierte una serie de caracteres numéricos (un texto formado por cifras) en el número entero o de punto flotantecorrespondiente.

Mediante el procedimiento cmdSalir_Click, se cierra el programa, gracias a la instrucción
End. El cometido de Beep no es otro que el de emitir un pitido a través del altavoz del ordenador,que indicará que en efecto se ha salido del programa.
Private Sub cmbSalir_Click()
Beep
End
End Sub

Para crear un programa ejecutable se utiliza el comando Make nombreProyecto.exe … en el menúFile. De esta manera se generará un fichero cuya extensión será *.exe. Para que este programa funcione en un ordenador solamente se necesita que el fichero MSVBVM60.DLL esté instalado en el directorioc:\Windows\System o c:\Winnt\System32. En el caso de proyectos más complejos en los que se utilicen muchos controles pueden ser necesarios más ficheros, la mayoría de ellos con extensiones *.ocx,...