Bonjour à tous,
Je souhaite effectuer une action lorsque j'appuie sur un bouton ou lorsque j'appuie sur une touche du clavier.
Cela fonction qu'à moitié...
Lorsque je lance l'application et que je ne touche pas au bouton, l'action s'effectue correctement lorsque j'appuie sur le touche du clavier, puis lorsque j'appuie sur le bouton cela fonctionne.
En revanche, lorsque j'ai appuyé sur le bouton et que je souhaite refaire la même chose via une touche du clavier, dans ce cas, cela ne fonctionne pas, aucune réponse...
Alors, avez vous saisi mon soucis?
Je pense que cela provient de la déclaration du "sub", j'ai bidouillé quelques syntaxes, mais rien n'y fait.
Voici, le bout du programme concerné :
Pour la touche lorsque j'appuie :
Pour la touche, lorsque je relâche
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub Form_Fleche_Appuyee(ByVal sender As Object, ByVal e As KeyEventArgs) Handles Me.KeyDown If e.KeyCode = Keys.Right Then ... end if end sub
Merci à vous
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub Form_Fleche_relachee(ByVal sender As Object, ByVal e As KeyEventArgs) Handles Me.KeyUp If e.KeyCode = Keys.Right Then .... end if end sub
Cordialement
Lio
Partager