Eventos KeyPress, Evento Clic

Formación en Valor: Orden.
Núcleo Integrador: Eventos KeyPress, Evento Clic.
Objetivo: Programar el Mouse y el teclado.

Tenga en cuenta:

Diseñe el siguiente formulario, teniendo en cuenta lo explicado anteriormente:

Ventana de código F7

Tenga en cuenta:
‘ VAL Es una instrucción que convierte el contenido del cuadro de texto a valor

‘ IF Instrucción que evalúa una condición y devuelve un valor de VERDAD (FALSO O VERDADERO)

‘ CLIC  es un evento que ocurre cuando se da CLIC sobre un control.

‘ KEYPRESS es un evento que ocurre cuando se presiona una tecla.

‘ END  instrucción que finaliza un programa.

‘ SETFOCUS Instrucción que cambia el FOCO o cursor hacia un control (Cuadro de Texto o Botón de Comando)

‘ KEYASCII es una variable que contiene el código de la ultima tecla pulsada,  TENGA EN CUENTA QUE 13 ES EL CÓDIGO DEL ENTER.

' UCASE convierte a mayuscula el texto de un control o variable

Borre la información de la ventana de código y copie el siguiente código.

Private Sub Command1_Click()

  If Val(Text2) <= 1200000 Then

    Text3 = 70000

  Else

    Text3 = 0

  End If

  Text4 = Val(Text2) + Val(Text3) 

End Sub

Private Sub Command2_Click()

  Text1 = ""

  Text2 = ""

  Text3 = ""

  Text4 = ""

  Text1.SetFocus

End Sub

Private Sub Command3_Click()

  End

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)

  If KeyAscii = 13 Then

    Text2.SetFocus

  End If

End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)

  If KeyAscii = 13 Then

    Command1.SetFocus

  End If

End Sub

NO COPIE ESTE TEXTO.

Ejecute el programa con la tecla F5

Escriba el nombre y presione ENTER.
Escriba un salario menor de 1200000 y presione ENTER.
ENTER en ACEPTAR.

LUEGO - CLIC EN NUEVO.

Escriba un nuevo nombre.
Un salario MAYOR DE 1200000 y presione ENTER.
ENTER en ACEPTAR.

TALLER EN PAREJAS:

En una hoja explique el funcionamiento del programa que se acaba de realizar:

¿ Que hace la programación de cada COMMANDBUTTON (Aceptar, Nuevo y Cerrar)?

¿ Que hace la programación de los TEXTBOX para Nombre y Salario?

¿ Cual es la finalidad del programa ?