Click droit sur bouton

Merci à vous deux pour votre aide.

(toute petite correction pour le code de jrivet, pour le bouton droit)

Private Sub Button1_MouseDown(ByVal sender As Object, ByVal e As _
  System.Windows.Forms.MouseEventArgs) Handles Button1.MouseDown
        If e.Button = Windows.Forms.MouseButtons.right Then
            Call _
              MessageBox.Show("Le Bouton droit de la souris à été appuyé sur le bouton1")
        End If
    End Sub