Cela m'evite de reecrire une partie du code
Button.PerformClick()
Private Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click, Button2.Click Dim s As String If sender Is Button1 Then s = "button1" ElseIf sender Is Button2 Then s = "button2" End If MessageBox.Show("You pressed: " + s) End Sub
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionPublic Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click MessageBox.Show(sender.name) End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Button1_Click(sender, e) End Sub End Class