Discussion :

[colapsus]

Bonjour, bonsoir à tous forumeurs et forumeuses, je vous explique, je désire attribuer à une touche en utilisant un Keydown, qui, lorsque l'on appuie sur une touche, telle que Alt, alors cela reviendrait à appuyer sur le bouton "quitter", qui lui, ferme l'application.
Apres plusieurs recherches ( mon bouquin pour visual studio 2008)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
Private Sub Button2_Keydown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Button2.KeyDown
        If e.Shift Then
 
            Button2.click = UCase(Button2_click)
 
        End If
 
    End Sub

Mais ça ne fonctionne pas, sauriez vous comment faire ?

[shayw]

Salut

tu veux en appuyant sur la touche alt simuler le clique du bouton

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
   Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown
        If e.KeyCode = Keys.Menu Then
            Button2.PerformClick()
        End If
    End Sub

[colapsus]

Voici le code lorsque l'on appuie sur le bouton "quitter"

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
 Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        If MsgBox("Voulez vous quitter l'application ?", vbYesNo, "Quitter") = vbYes Then
            End
        End If
    End Sub

ce que je voudrais, est lorsque l'on appuie sur la touche Alt, alors c'est comme si l'on effectuait le clic sur le bouton c'est a dire faire
e.Alt = button2.click

[shayw]

le keydown de la touche alt de ta form ?

[colapsus]

Oui créer une Private Sub, disant que
Si Keydown touche alt
alors evenement Boutonquitter

peut on le faire ?

[shayw]

As tu testé le code donné

à quoi sert de simuler le click par un keydown
écrit dans la sub du keydown le code du button2 click