Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click, Button2.Click 'SELECT CASE DU BOUTON PRESSE ??? Select Case DirectCast(sender, Windows.Forms.Button).Name Case "Button1" MessageBox.Show("le bouton 1 a été cliqué") Case "Button2" MessageBox.Show("le bouton 2 a été cliqué") End Select End Sub