OVH Cloud OVH Cloud

Augmentation de la valeur Variable

1 réponse
Avatar
Éric Fontaine
Bonjour

Dans mon code je doit déclarer 7 variable de type integer
Var1, Var2, Var3, etc....

Je voudrais dans une boucle attribuer des valeurs différentes a ces
varibales du genre

While compteur = 7
var & compteur = 10
compteur = compteur +1
wend

Mais je ne suis pas capable d'obtenir un résultat adéquat.

Est-ce que quelqu'un connait la solution?

Merci

1 réponse

Avatar
Raymond
Bonsoir.
c'est une solution typique pour un tableau. tu déclares Var en tableau de 7
membres et tu charges chaque membre avec le compteur lui-même par exemple.
Dans ton code tu appelles toujours Var(index) et tu peux faire des boucles
sans souci.

Dim Compteur As Integer
Dim Var(1 To 7) As Integer

Private Sub Charger()
For Compteur = 1 To 7
Var(Compteur) = Compteur
Next Compteur
End Sub

Tu peux aussi affecter une valeur par Var(7) = 50
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.


"Éric Fontaine" a écrit dans le message de
news:mTRpb.58931$
Bonjour

Dans mon code je doit déclarer 7 variable de type integer
Var1, Var2, Var3, etc....

Je voudrais dans une boucle attribuer des valeurs différentes a ces
varibales du genre

While compteur = 7
var & compteur = 10
compteur = compteur +1
wend

Mais je ne suis pas capable d'obtenir un résultat adéquat.

Est-ce que quelqu'un connait la solution?

Merci