Concatenation?

[microdevweb]

Bonjour,

Existe t'il un méthode pour faire appel à une variable de façon dynamique

voici une exemple ou je suis obligé de faire comme ceci

Code : Tout sélectionner

For N=0 To 6
        x2+(gLargeur_Case*N)
        Select N
          Case 0
            Num$=Str(Tirages()\Tir1)
          Case 1
            Num$=Str(Tirages()\Tir2)
          Case 2
            Num$=Str(Tirages()\Tir3)
          Case 3
            Num$=Str(Tirages()\Tir4)
          Case 4
            Num$=Str(Tirages()\Tir5)
          Case 5
            Num$=Str(Tirages()\Tir6)
          Case 6
            Num$=Str(Tirages()\TirC)
        EndSelect
Next

J'aurais préféré faire du genre

Code : Tout sélectionner

For N=0 To 6
    x2+(gLargeur_Case*N)
    Num$=Str(Tirages()\Tir'N')
Next

J'espère que je suis asse clair dans ma question

Merci d'avance

[falsam]

Bonjour microdevweb.
J'ai déjà posé cette question et la réponse à été non.

[microdevweb]

Merci pour ta réponse et je trouve cela bien dommage.

[Fred]

Dans ton cas, tu peux utiliser un tableau: Tirages()\Tir[x]

[falsam]

Code : Tout sélectionner

Structure Tirage
  Tir.i [7]  
EndStructure

NewList Tirages.tirage()

;Alimente le tirage avec n'importe quoi
AddElement(Tirages())
For N=1 To 6
  Tirages()\Tir[N]=100*N
Next


For N=1 To 6
  Num$=Str(Tirages()\Tir[N])
  Debug Num$
Next

[microdevweb]

Oui c'est vrai que ce n'est pas bête. Comme solution dans certains cas