Je souhaiterai intercepter une touche (la barre d'espace) dans mon application, qui est composée que d'une seule form, quelque soit le contrôle s'y trouvant ayant le focus.
1 réponse
Votes
Date
Date décroissante
f894009
Bonjour,
Private Sub Form_Load()
Me.KeyPreview = True
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeySpace Then
MsgBox "Aide"
KeyCode = 0
End If
End Sub
Code trouve sur Codes-Sources écrit par Jacques93 en 2007