Public Sub ProcClick(ByVal sender As Object, ByVal e as EventArgs) Handles _ Bouton1.Click, Bouton2.Click 'Regroupement des événements "Click" d'un groupe 2 boutons 'Traitement End Sub