label1 to 10 ?

Question

bonjour,

je voudrais renommer plein de label (ou autre)
label1.caption 
label2.caption ....

est il possible d'utiliser un boucle for
for i=1 to 10
labeli.caption

qq chose comme ca ???

merci d'avance

cs_Prince Charmant · Answer

Salut,

En VB ou VBA ?

En VBA, tu ne peux utiliser que :
         Me.Controls("Label"+Cstr(i)).Caption

En VB, utilise le même nom pour chacune des étiquettes et modifie la propriété Index (de 0 à ...). Tu obtients alors :
         Label(i).Caption

A+

cs_ravachol · Answer

en vb6

ok pour l'index mais la syntaxe exact ?
(je vais rechercher mais bon !)

cs_Prince Charmant · Answer

Salut,

tu crées tes label avec une propriété Index.

Pour l'utilisation tu donne le nom de l'un d'entre-eux (le même pour tous)
suivi du n° entre parenthèse :
MonLabel(Index).Caption="Toto"

A+

thierrydelepine · Answer

for i = 1 to 10

Me.Controls("Label" & i).Caption = "hello"

next

cs_ravachol · Answer

ayé j'ai reussit !

le meme nom ca me fiassait bizzare mais ca marche
avec un copier coller il numerote tout seul en plus 
merci

sinon plus dur :
comme je suis dans un tableau il me faudrait deux index
une pour la ligne
l'autre pour la collone ?
c possible ?

jrivet · Answer

salut,

Le double index sur les tableau de controles c est pas possible
mais essaie de joue avec l index ca devrait suffir normalement.

@+
Julien
-----------------------------------------------------------
 :big)  Essai ca sinon on trouvera autre chose  ;) 
-----------------------------------------------------------

cs_ravachol · Answer

cool j'ai reussit avec le me.controls
merci a tous !

cs_ravachol · Answer

merde ! me.controls ne marche pas avec la propriete visible :-(
fait chier

cs_ravachol · Answer

c bon j'ai reussit avec les index
par la formule
case = ligne+longeur d'une ligne*colonne

merci encore !

Label1 to 10 ?

9 réponses

Discussions similaires