Alors j'ai enfin trouvé comment faire une collection, donc en pratique indicer un objet (listes en l'espèce), voici :
Dim i As Long
Dim iL As New Collection() ' d,bute . 1 (iL)
iL.Add(Me.ListBox1)
iL.Add(Me.ListBox2)
iL.Add(Me.ListBox3)
iL.Add(Me.ListBox4)
For i = 1 To 4
Select Case i
Case 1 : iL(i).items.add("un")
Case 2 : iL(i).items.add("deux")
Case 3 : iL(i).items.add("trois")
Case 4 : iL(i).items.add("quatre")
End Select
Next i
Tiens, y a mon éditeur WebMail qui fait ce qu'il veut, il change de police, de taille, de couleur, d'espacement, ben ? Pourquoi pas...
Alors ça débute bien à 1 et non pas à 0, c'est une particularité des collections semblet-t-il... Pour une fois que c'est normal, le 0 étant le plus souvent un neutre, et non pas un positif...
Par contre je ne sais pas s'il faut utiliser "NoThing" en fin d'utilisation, en sortie de programme ?
Je me suis rensegné gâce à un site aussi, ici :
http://www.pise.info/vb-net/06.htm
C'est pas mal, il traite de la façon d'utiliser "for each" avec les collections, l'instruction "TypeOf" idem...
Il dit même qu'on peut rajouter aux Handles d'une procédure la liste des objets que l'on veut manipuler en les indiçant, ce qui serait une seconde méthode, mais bon, une seule suffit, tu verras si tu lis, ce n'est pas mal (un prof de fac), et justement lui aussi dit que les collections commencent un 1, et critique franchement vbNet, c'est d'ailleurs ce que j'en pense : deux fois plus compliqué et tordu, et deux fois moins performant, oui, je sais, on n'a pas le choix :o)
Bon, ben à la prochaîne, déjà là je vais me décharger d'un poids en indiçant, car jen avait marre de mettre if list1, if list2...
Alors j'ai enfin trouvé comment faire une collection, donc en pratique
indicer un objet (listes en l'espèce), voici :
Dim i As Long
Dim iL As New Collection() ' d,bute . 1 (iL)
iL.Add(Me.ListBox1)
iL.Add(Me.ListBox2)
iL.Add(Me.ListBox3)
iL.Add(Me.ListBox4)
For i = 1 To 4
Select Case i
Case 1 : iL(i).items.add("un")
Case 2 : iL(i).items.add("deux")
Case 3 : iL(i).items.add("trois")
Case 4 : iL(i).items.add("quatre")
End Select
Next i
Tiens, y a mon éditeur WebMail qui fait ce qu'il veut, il change de
police, de taille, de couleur, d'espacement, ben ? Pourquoi pas...
Alors ça débute bien à 1 et non pas à 0, c'est une particularité des
collections semblet-t-il... Pour une fois que c'est normal, le 0 étant le
plus souvent un neutre, et non pas un positif...
Par contre je ne sais pas s'il faut utiliser "NoThing" en fin
d'utilisation, en sortie de programme ?
Je me suis rensegné gâce à un site aussi, ici :
http://www.pise.info/vb-net/06.htm
C'est pas mal, il traite de la façon d'utiliser "for each" avec les
collections, l'instruction "TypeOf" idem...
Il dit même qu'on peut rajouter aux Handles d'une procédure la liste des
objets que l'on veut manipuler en les indiçant, ce qui serait une seconde
méthode, mais bon, une seule suffit, tu verras si tu lis, ce n'est pas mal
(un prof de fac), et justement lui aussi dit que les collections commencent
un 1, et critique franchement vbNet, c'est d'ailleurs ce que j'en pense :
deux fois plus compliqué et tordu, et deux fois moins performant, oui, je
sais, on n'a pas le choix :o)
Bon, ben à la prochaîne, déjà là je vais me décharger d'un poids en
indiçant, car jen avait marre de mettre if list1, if list2...
Alors j'ai enfin trouvé comment faire une collection, donc en pratique indicer un objet (listes en l'espèce), voici :
Dim i As Long
Dim iL As New Collection() ' d,bute . 1 (iL)
iL.Add(Me.ListBox1)
iL.Add(Me.ListBox2)
iL.Add(Me.ListBox3)
iL.Add(Me.ListBox4)
For i = 1 To 4
Select Case i
Case 1 : iL(i).items.add("un")
Case 2 : iL(i).items.add("deux")
Case 3 : iL(i).items.add("trois")
Case 4 : iL(i).items.add("quatre")
End Select
Next i
Tiens, y a mon éditeur WebMail qui fait ce qu'il veut, il change de police, de taille, de couleur, d'espacement, ben ? Pourquoi pas...
Alors ça débute bien à 1 et non pas à 0, c'est une particularité des collections semblet-t-il... Pour une fois que c'est normal, le 0 étant le plus souvent un neutre, et non pas un positif...
Par contre je ne sais pas s'il faut utiliser "NoThing" en fin d'utilisation, en sortie de programme ?
Je me suis rensegné gâce à un site aussi, ici :
http://www.pise.info/vb-net/06.htm
C'est pas mal, il traite de la façon d'utiliser "for each" avec les collections, l'instruction "TypeOf" idem...
Il dit même qu'on peut rajouter aux Handles d'une procédure la liste des objets que l'on veut manipuler en les indiçant, ce qui serait une seconde méthode, mais bon, une seule suffit, tu verras si tu lis, ce n'est pas mal (un prof de fac), et justement lui aussi dit que les collections commencent un 1, et critique franchement vbNet, c'est d'ailleurs ce que j'en pense : deux fois plus compliqué et tordu, et deux fois moins performant, oui, je sais, on n'a pas le choix :o)
Bon, ben à la prochaîne, déjà là je vais me décharger d'un poids en indiçant, car jen avait marre de mettre if list1, if list2...