Discussion :

[Cydreav]

Bonjour, j'aimerai savoir s'il est possible d'enclencher un même algorithme lorsque l'utilisateur clique sur n'importe quel bouton de mon form

En fait je cherche à éviter d'avoir :

Code :

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

1
2
3
4
5
6
7
 
Private Sub Button00_Click ...
Private Sub Button01_Click ...
Private Sub Button02_Click ...
Private Sub Button03_Click ...
... etc...
Avec les mêmes lignes de codes dans chaques procédures.

Merci d'avance pour votre aide

[neguib]

Bon apparemment tu n'as pas encore reçu la reponse que tu aurais d'ailleurs pu trouver facilment avec une petite recherche avancé sur les forum .Net
Il suffit d'abonner chacun des Click de chacun de tes Button à une seule et même méthode du moment que celle-ci corresponde à la signature normale du Delegate de Click
Par exemple dans InitializeComponent()

Code :

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

1
2
3
4
5
6
7
8
9
 
'Bouton0
'...
AddHandler Bouton0.Click, AddressOf MesBoutonsClick
'...
'Bouton1
'...
AddHandler Bouton1.Click, AddressOf MesBoutonsClick
'...etc...

Puis la méthode en question

Code :

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

1
2
3
4
5
6
7
 
Private Sub MesBoutonsClick(ByVal sender As Object,ByVal  e As EventArgs)
   '...ici tu peux très bien si necessaire
   '... distinguer quel bouton est concerné
   '...en manipulant CType(sender, Button)
   '...pour le code à executer
End Sub

[NicolasG]

Pour ajouter une précision à l'excellente réponse de neguib, il suffit de sélectionner tous les boutons dans le designer puis d'affecter un handler d'événement avec l'éditeur de propriété.

L'opération est exactement la même avec un bouton qu'avec plusieurs.

[neguib]

Pour ajouter une précision à l'excellente réponse de neguib, il suffit de sélectionner tous les boutons dans le designer puis d'affecter un handler d'événement avec l'éditeur de propriété.

L'opération est exactement la même avec un bouton qu'avec plusieurs.

+1 effectivement
D'ailleurs la conséquence dans le code généré en VB.Net sera un abonnement groupé directement sous cette forme

Code :

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

1
2
3
4
 
Private Sub MesBoutonsClick(ByVal sender As System.Object, ByVal  e As System.EventArgs) Handles Bouton0.Click, Bouton1.Click, Bouton2.Click '...etc
   '...
End Sub

[Cydreav]

Merci pour vos réponses, j'ai réussi à économiser beaucoup de place dans mon code.