Cómo asignar acciones a las teclas?
1 - Crear un formulario de pedido en la estructura y el evento "Al hacer clic en" en las propiedades de la forma de escribir lo siguiente: me.keypreview = true
¿O es esto va a hacer que los eventos de teclado se reciben en la primera forma.
2 - En las propiedades del formulario, "botón de abajo para" el caso de poner el siguiente código:
Form_KeyDown Private Sub (KeyCode As Integer, Shift As Integer)
Seleccione KeyCode Case
Caso vbKeyF2
DoCmd.OpenForm "Form1"
Caso vbKeyF3
DoCmd.OpenForm "Form2"
Caso vbKeyF4
DoCmd.OpenForm "formulario3"
Caso vbKeyF5
Como Calculadora Dim doble
Calculadora = Shell ("calc.exe", vbNormalFocus)
Caso vbKeyF6
DoCmd.Close
Case Else
End Select
End Sub
Lo que esto hace es el siguiente:
- Pulsando la tecla F2 abre el form1
- Pulsando la tecla F3 abre Form2
- Pulsando la tecla F4 abre la formulário3
- Pulsando la tecla F5 se abre la calculadora de Windows
- Al presionar la tecla F6 cierra el formulario
Además de la tecla de función F1, F2, ... etc, también podemos utilizar cualquier otro botón para realizar las funciones, pero teniendo en cuenta que si vamos a introducir datos en una forma que no son aptos para usar las teclas que se utilizan para escribir los datos en los campos.
Otra cosa es que sólo funciona en la forma en la que poner los códigos anteriores.
Descargar: Claves 






























Wow, por lo que este ejemplo no? Usted puede hacer uno y me envía por correo electrónico?!?! Muchas gracias! Ate!