Shortcut handlesRésolu

Question

Bonjour

J'aimerais savoir s'il est possible de faire un "shortcut" pour les handles.

Voici un exemple :

Private Sub Jour01Label_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Jour01Label.click, Jour02Label.click, ..., Jour40Label.click

Deviendrait :

Private Sub Jour01Label_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MaCollection.item(1 to 40).click

Le "deviendrait" n'ait qu'un exemple, car c'est ce que j'ai essayé et ça ne fonctionne pas.

Merci

Utilisateur anonyme · Accepted Answer

Salut,

Nan, pas possible, mais tu peut toujours ajouter avec un AddHandler.



__________
Kenji

Utilisateur anonyme · Answer

Exemple :



For i As Integer = 1 To 40
  AddHandler MyBase.Controls(String.Format("Jour{0}Label", i.ToString("00"))).Click, AddressOf Jour01Label_Click
Next,

----

(Coloration syntaxique automatique par Kenji)



et bien sur tu ne met plus les Handles à ta sub.





__________
Kenji

cire2003 · Answer

merci! très intéressant... et pratique;)
http://monstershost.com/images/pub.swf

Shortcut handles

3 réponses

Votre réponse

Discussions similaires