La Web del Programador: Comunidad de Programadores
 
    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