Code ascii de CTRL et SHIFT

Résolu
cs_Anthomicro Messages postés 9433 Date d'inscription mardi 9 octobre 2001 Statut Membre Dernière intervention 13 avril 2007 - 21 janv. 2003 à 18:08
cs_Anthomicro Messages postés 9433 Date d'inscription mardi 9 octobre 2001 Statut Membre Dernière intervention 13 avril 2007 - 22 janv. 2003 à 18:23
Salut tout le monde !

j'aimerais savoir comment faire pour savoir si la touche CTRL est pressée ou si la touche SHIFT est pressée.

merci

mail : jeanpierre.rossetto@club-internet.fr

2 réponses

clementio Messages postés 432 Date d'inscription samedi 18 mai 2002 Statut Membre Dernière intervention 17 février 2014 1
21 janv. 2003 à 19:09
Voilà un bout de code qui peut t'aider:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode vbKeyShift Then Me.Caption "Shift enfoncé" If KeyCode vbKeyControl Then Me.Caption "Ctrl enfoncé"
End Sub

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer) If KeyCode vbKeyShift Then Me.Caption "Shift relaché" If KeyCode vbKeyControl Then Me.Caption "Ctrl relaché"
End Sub

A+, Clm
3
cs_Anthomicro Messages postés 9433 Date d'inscription mardi 9 octobre 2001 Statut Membre Dernière intervention 13 avril 2007 8
22 janv. 2003 à 18:23
Merci à toi
c'est tout con en fait

salut

mail : jeanpierre.rossetto@club-internet.fr
0
Rejoignez-nous