Discussion :

[GuyDuLac]

Bonsoir,

j'ai plusieurs objets ayant le même début de nom

me.var01
me.var02
me.var03 etc.
...

Dans une boucle je voudrais pouvoir utilisé un compteur pour récupérer la valeur des objets.

dim Groupe as string
dim x as single

for x = 1 to 20
groupe = groupe & "me.var" & !!!x

next x



Merci a l'avance

[tee_grandbois]

Bonsoir,
ne mets pas de doubles quotes si tu veux récupérer la valeur de tes variables, sinon cela devient une constante, de plus tu dois utiliser la propriété Controls pour récupérer tes valeurs et formater le compteur de manière à forcer le 0 significatif :

Code :

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

1
2
3
4
5
6
7
dim Groupe as string
dim x as Integer
 
for x = 1 to 20
Groupe = Groupe & Me.Controls("Var" & Format(x, "00")).Value
 
next x

[myrddin99]

Bonjour,

ça soulève une question existentielle de mon côté, j'utilise rarement le FOR, dans ce cas précis j'aurais eu tendance à utiliser un WHILE. Quelle est la différence?

aussi, de mon côté, j'utilise une notation un peu différente:

Code :

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

1
2
3
4
5
6
i = 1                             
Do While i <= 30
    base = "me_VAR" & CStr(i)
    Forms!Formulaire(base) = ""
    i = i + 1
Loop

Je convertis ma numérotation en string que j'attache à la partie commune des objets.

Puis je tire mon information avec un me(base).

Ça me semble équivalent...?

Merci

[GuyDuLac]

Bonjour,

ça soulève une question existentielle de mon côté, j'utilise rarement le FOR, dans ce cas précis j'aurais eu tendance à utiliser un WHILE. Quelle est la différence?

aussi, de mon côté, j'utilise une notation un peu différente:

Code :

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

1
2
3
4
5
6
i = 1                             
Do While i <= 30
    base = "me_VAR" & CStr(i)
    Forms!Formulaire(base) = ""
    i = i + 1
Loop

Je convertis ma numérotation en string que j'attache à la partie commune des objets.

Puis je tire mon information avec un me(base).

Ça me semble équivalent...?

Merci

merci, intéressant comme approche