Pregunta: | 15550 - DESACTIVAR LAS TECLAS ALT Y CONTROL |
Autor: | Martin Lopez |
Hola, gracias por contestar.
Quisiera saber como puedo desactivar estas dos teclas en tiempo de ejecucion ALT y CONTROL, ya que estoy utilizando: dentro de un form Private Sub Timer1_Timer() If KeysPressed(vbKeyA, vbKeyControl) Then vbKeyA.Enable = False vbKeyControl.Enable = False End If End pero no funciona. Me podrian decir como le hago para desactivarlas. Gracias |
Respuesta: | Adriana |
Hola:
Creo que el problema es que ese código lo debes incluir en el evento KeyDown o KeyUp de un objeto para que funcione por ejemplo: Private Sub text1_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = vbKeyControl Then 'En lugar de activarse la tecla control, se activa la tecla ESC KeyCode = vbKeyCancel msgbox "No puedes presionar la tecla Control" End If End Sub Espero que te sirva |