Gestion clavier - touche - comment capter les touches ... vb simplifié

Commenter

Contenu du snippet

tout petit script de base en vb, mais bon je démarre, et dans ma recherche d'infos sur la captation des touches du clavier, ben j'ai rien trouvé de simple (rapide à programmer) :
j'ai mis 3 jours à trouver ça, alors hein, on rigole pas :-))

Source / Exemple : 


Dim touche As Integer

Public Sub form_KeyPress(KeyCode As Integer)    ' private ? : pas testé
    If touche = VK_ESCAPE Then
        End
    Else
        If touche = VK_ENTER Then
        MsgBox ("taper return")
    End If
    End If
End Sub

Private Sub Command1_Click()
    ' alors on continue ............
    msgbox "coucou return"
End Sub

Private Sub Command2_Click()
End
End Sub

Private Sub Form_Load()
    Form1.Caption = "ça sert à rien"
    Command1.Caption = "&Continuer"  ' alt + C marche donc
     Command2.Caption = "&Annuler"    ' alt + A marche donc
    Command1.Font.Bold = 10
    Command2.Font.Bold = 10
    SendKeyboardEvents = True   ' LE TRUC !!!!!!!!!!!!!!!
    
    touche = KeyCode
    
End Sub

Conclusion :


voila, y'a plus qu'à dessiner des zolis boutons (2) et essayer
c'est du lego

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (cs_etniqs)