Eventos, Propiedas Y Metodos De Visual Basic

Eventos.
Según el tipo de objeto, se admitirán algunos eventos, ya que si bien hay eventos comunes a varios objetos, otros no los tienen, y algunos objetos no tienen eventos (por ejemplo los controles Line y Shape).
En la ventana de de código de un formulario hay dos cuadros combinados en la parte superior. El de la izquierda despliega todos los controles del formulario (y el propio formulario)que admiten eventos, si se selecciona uno, en el cuadro combinado de la derecha aparecerán todos los eventos que ese control soporta.
Cuando un evento tiene lugar, el usuario programa lo que ese evento desencadenará. Esto se establece de la siguiente manera:
Private Sub objeto_evento()
Sentencias
End Sub
Donde objeto es el nombre del objeto en que se genera el evento y evento es el nombredel evento que se genera. Sentencias son las instrucciones que indican qué ocurrirá al producirse este evento y End Sub finaliza este procedimiento.
Antes de continuar, hay que aclarar los nombres de los controles. Un control puede tener cualquier nombre, siempre que empiece con una letra, que no tenga caracteres comodines (como ? ; / \ < > # : *) y no sea una palabra reservada por ellenguaje; estas palabras reservadas aparecen en azul cuando se escribe el código (For, Private, End, If, Print, etc.). Por convención, se establece que las tres primeras letras del nombre del objeto lo describan y las restantes describan su función; por ejemplo, una caja de texto donse se escriban edades, podría llamarse txtEdad, sin embargo es una convención, no es regla.
Algunos eventos tienenargumentos. Los argumentos son datos adicionales sobre el evento, los cuales lo hacen más específico; hay eventos que no utilizan argumentos y otros que sí. Los argumentos se encierran entre paréntesis a continuación del nombre del evento.
Ejemplo 1
Crea un nuevo proyecto estándar y coloca los siguientes controles, con sus propiedades:
Control | Propiedad | Valor |
Form | Name | frmProg |Commandbutton | Name | cmdBlanco |
" " | Caption | Blanco |
Commandbutton | Name | cmdAzul |
" " | Caption | Azul |
Textbox | Name | Text1 |
Escribe en la ventana de código del formulario el siguiente código:
Private Sub cmdBlanco_Click()
Text1.BackColor=vbWhite
End Sub
Private Sub cmdAzul_Click()
Text1.BackColor=vbBlue
End Sub
Ejecute el programa como ya se ha vistoanteriormente (menú Ejecutar o F5).
Cuando se hace clic sobre el botón de nombre cmdBlanco, se desencadena el evento Click, el cual trae por resultado el cambio del color de fondo de la caja de texto, y lo mismo ocurre con el botón cmdAzul.
Ahora un ejemplo de un evento que lleva argumentos: el evento KeyPress. Este evento ocurre cuando se oprime una tecla del teclado sobre un control. Lleva porargumento la expresión Keyascii as Integer, el cual especifica el botón del teclado que se pulsó.
Crea un nuevo proyecto y coloca los siguientes controles:
Control | Propiedad | Valor |
Form | Name | frmProg |
Commandbutton | Name | cmdPrueba |
" " | Caption | Convertir |
Textbox | Name | txtPrueba |
" " | Text | |
Escribe en la ventana de código del formulario elsiguiente código:
Private Sub cmdPrueba_Click()
txtPrueba.Text=Chr(Keyascii)
End Sub
Private Sub txtPrueba_KeyPress(Keyascii as Integer)
cmdPrueba.SetFocus
End Sub
Pulse F5 para probar esta aplicación. Cada tecla del teclado tiene un carácter en código ASCII que la representa y se puede saber oprimiendo la tecla Alt y un número en el teclado numérico. Por ejemplo, el carácter @ tiene número64, o sea que Alt+64 devolverá el carácter @.
A continuación, una lista de los eventos más usuales y su descripción.
* Click: ocurre al hacer clic sobre un control (con el botón primario del mouse). No lleva argumentos.
* Dblclick: ocurre al hacer doble click sobre un control (con el botón primario del mouse). No lleva argumentos.
* LostFocus: ocurre cuando un control pierde el...