[VB6] Variable Variable

Bonjour à tous!

Dans mon code, j'ai 5 variables nommées:

• option1
• option2
• option3
• option4
• option5

Je souhaiterais accéder à ces variables dans une boucle for de 1 à 5.

J'ai bien essayé le option & i mais à priori VB n'en veut pas... :(

Donc si quelqu'un a la solution... Merci! :D

utilise un tableau.... ;)

ce n'est pas à proprement parler la solution, mais tu peux également passer par un tableau :

option(i)

Merci pour cette réponse rapide mais je suis obligé de travailler dans la situation décrite plus haut.

Je bosse sur un projet dont je ne peux pas modifier toutes les sources.. :?

Citation:

---

Envoyé par Appwal

Je bosse sur un projet dont je ne peux pas modifier toutes les sources.. :?

---

!!! ça risque d'être compliqué (impossible?) alors...

Ok!

Va falloir que je me débrouille autrement alors...

Merci quand même! ;)

Tu peux détailler un peu, montrer un bout de code pour nous faire voir ce que tu veux faire exactement stp ? C'est toujours délicat de répondre sans connaitre les tenants et aboutissants mais peut être que la fonction Choose pourrait être utile.

A vrai dire il n'y a pas grand chose de plus dans mon code:

C'est vraiment juste une boucle for avec un accès à ces variables à l'intérieur.

Code:

---

1 2 3 4 5 6

For i = 1 To 5 If (Option & i = "ZONEOPTION") Then Trouve = True End If Next i

---

Code:

---

1 2 3 4 5

For i = 1 To 5 If Choose(i, Option1, Option2, Option3, Option4, Option5) = "ZONEOPTION" Then Trouve = True End If Next i

---

Merci bien ;)

Et sinon, pour ma culture générale, il est donc impossible d'avoir des "variables variables" en VB?

De manière simple en tout cas je ne vois pas, sinon c'est peut etre possible mais pas dans mes cordes.
C'est pourquoi on utilise des tableaux, c'est tout de même nettement plus efficace ;)

Citation:

---

Envoyé par Appwal

Merci bien ;)

Et sinon, pour ma culture générale, il est donc impossible d'avoir des "variables variables" en VB?

---

Si, c'est juste tafaçon de l'écrire qui est incorrecte, tu associe un nom (string) avec i (integer), ca ira jamais ;)

Ton nom doit devenir : Option & Trim(Str(i)) qui transforme ton indice en string :D

:oops: même pas fait gaffe à ça

:king:

Ah ca c'est sympa :D

Merci à vous ;)

Citation:

---

Envoyé par khany

Si, c'est juste tafaçon de l'écrire qui est incorrecte, tu associe un nom (string) avec i (integer), ca ira jamais ;)

Ton nom doit devenir : Option & Trim(Str(i)) qui transforme ton indice en string :D

---

Euh... d'accord pour la concaténation de types différents mais Option, c'est quoi du coup ?

Je ne vois pas comment ça peut marcher 8O

Code:

---

1 2 3 4 5 6 7 8

Dim mavar1 As String ' mavar1 = "blabla" ' MsgBox "mavar" & Trim$(Str$(1)) '=> mavar1 et non blabla MsgBox mavar & Trim$(Str$(1)) '=> mavar est non défini et pour cause... '

---

Exact, je viens de tester et je tombe sur le même résultat que Phifi :?

Je suis pourtant certaine de l'avoir déjà fait :koi:

Peut-être pas le même cas :oops:

J'utilise ce genre de chose pour les noms de champs indexés, c'est peut-être un cas similaire

ex :

Code:

---

1 2 3 4 5 6 7 8

'mon recordset a 10 champs -> monchamp1, monchamp2 etc... For ix = 1 to 10 rst.Addnew rst("monchamp" & trim$(str$(ix))) = TxtZone(ix) rst.Update 'par exemple Next ix

---

mais pour ce qui est des variables et des objets non indexés, je n'ai jamais réussi à faire un truc pareil

il me semble que c'est impossible à faire.

Venant du php, j'avais cherché à reproduire le fameux "$$variable" mais je n'ai pas réussi.

Je me souviens maintenant, c'est un peu le même cas que PhiFi, des contrôles liés à des signets dans Word et des noms de contrôles lors d'ajout dynamique de contrôles avec .Add 8-)

Désolée pour le faux espoir :lol: