Remplir tableau [Résolu]

Signaler
Messages postés
18
Date d'inscription
samedi 10 mai 2008
Statut
Membre
Dernière intervention
30 juin 2008
-
Messages postés
18
Date d'inscription
samedi 10 mai 2008
Statut
Membre
Dernière intervention
30 juin 2008
-
Slt tout le monde,

Dim total as integer
Total=6
Dim Tableau() as integer
redim Tableau (total)

J'aimerai que mon tableau contient les valeur 0 1 2 3 4 5
c'est à dire que l'indice 0 du tableau = 0
 l'indice 1 du tableau = valeur 1
 l'indice 2 du tableau = valeur 2

etc ....

J'ai essayé : tableau(0 to total)
sa ne marche pas

MErci +

3 réponses

Messages postés
7393
Date d'inscription
mercredi 23 avril 2003
Statut
Membre
Dernière intervention
6 avril 2012
57
Salut,
Essaie plutot

Dim total As Integer
Dim i As Integer
total = 6
Dim Tableau() As Integer
ReDim Tableau(total - 1)

For i = LBound(Tableau) To UBound(Tableau)
   Tableau(i) = i
Next, ----
[code.aspx?ID=41455 By Renfield]

@+: Ju£i€n
Pensez: Réponse acceptée
Messages postés
146
Date d'inscription
dimanche 23 janvier 2005
Statut
Membre
Dernière intervention
17 novembre 2009
1
Salut

Tu peux faire

Dim Tableau() As Variant

Tableau = Array(0,1,2,3,4,5)

Ou bien

Dim Tableau() As Integer, i As Integer,Total As Integer
Total = 6
ReDim Tableau(Total)

For i = 0 To 5
   Tableau(i) = i
Next i

@+
Messages postés
18
Date d'inscription
samedi 10 mai 2008
Statut
Membre
Dernière intervention
30 juin 2008

OKi merci bien.
Vous avez la solution les 2 !!

++