| Pregunta: | 17682 - COMO DETECTO F1-F12 Y CTRL + ? EN VISUAL BASIC |
| Autor: | Brandon Cala Cala |
| AMIGOS! ESTOY DISEÑANDO UN PROYECTO PARA MI UNIVERSIDAD SOY ESTUDIANTE DE PROGRAMACION. EN UN FORMULARIO TENGO UNA BARRA DE BOTONES EN ELLA ESTA EL BOTON PARA GUARDAR LOS DATOS EN LA BASE. QUIERO GUARDAR CON PRESIONAR CTRL + G Y ADEMAS COMO LO HARIA PARA LLAMAR A LAS TECLAS DE FUNCIONES F1-F12.
GRACIAS, SALUDOS! | |
| Respuesta: | Fk |
| La detección de teclas 'no habituales' como las de función, los cursores o las de avance de página debes de realizarlas mediante el evento KeyDown. Prueba con este ejemplo a mí me funciona perfectamente. Saludos
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) Select Case KeyCode Case vbKeyF1 To vbKeyF12: 'Aqui se detectan las pulsaciones de las teclas F1 hasta la F12 Case vbKeyE 'Detecta la tecla E If (Shift And vbCtrlMask) > 0 And (Shift And vbAltMask) > 0 And (Shift And vbShiftMask) > 0 Then Tecla Ctrl pulsada Tecla Alt pulsada Tecla Shift pulsada end if End Select End Sub | |
| Respuesta: | Mariano Laguzzi |
| Te cuento como es:
1) En el evento Load del formulario pone: KeyPreview = True 2) Luego en evento Form_KeyPress pones: If (pKeyAscii = vbKeyEscape) Then 'lo que quieras que haga. End If Saludos | |
| Respuesta: | HENRY CASTILLO |
| PARA ESO DEBES SABER EL CODIGO ASCCI DE LA TECLA QUE QUIERES DIGITAR Y PONER ESE CODIGO EN LA FUNCION KeyPress(KeyAscii AS INTEGER) DE LA FORMA QUE HACE DE MENU PRINCIPAL | |