¡Maestros de VB, por favor entren! ¡Por favor dame el código de control del teclado! Gracias... habrán muchas gracias... ¡Sólo sé un poquito de VB! ¡Intenta hacerme copiar el código! Gracias...
El proceso de codificación es el siguiente:
Primero haga las siguientes declaraciones en el módulo.
La función de declaración pública GetAsyncKeyState Lib "usuario 32" (ByVal vkey As Long) es un número entero
Luego agregue un control de temporizador y un control de comando al formulario.
Subcomando privado 1_Click()
MsgBox "¡Hola a todos!"
Finalizar conector
Subformulario privado_Load()
Temporizador 1. intervalo = 100
Conector final
Sub-timer1_Timer()
si GetAsyncKeyState(tecla VB F4) lt entonces 0
< p; >Llamar al comando 1_ClickTerminará si...
Finalizar conector
Entonces, presionar F4 activará el evento del botón.
También existe esta línea, escrita directamente en el código del formulario:
Subcomando privado 1_Click()
MsgBox "Duración"
Conector final
Subform_Load() privado
Comando 1. caption = "command 1(&answer)"
Conector final
El evento del botón se activará cuando presiones alt a.