Discussion :

[Mandarine]

J'ai récupérer un projet dans lequel il y a une centainte de form appellée : form1, form2, ...form100.
Toutes ces formes sont exactement les meme et je dois copier le contenu de toutes ses formes dans un seul fichier texte.
J'ai donc penser à faire une boucle de 1 à 100 mais le truc c'est que je n'arrive pas a faire varier le nom de mes forms.
Je pense que ce n'est pas clair
Je n'arrive pas à dire:

Code :

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

1
2
3
for i=1 to 100 
print "form" & i .text.caption
next

Si quelqu'un pouvait m'aider

[Le Pharaon]

Pour faire varier les noms voici le code. Il faut enlever le ".text.caption"

Code :

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

1
2
3
for i=1 to 100 
 print " Formulaire " & i & " : " & "form" & i 
next

[Mandarine]

Oui mais ensuite je veux pour chaque formulaire récupérer des infos telles que des valeurs des textbox par exemple et cela au sein de ma boucle.

Est ce la syntaxe suivante:

Code :

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

print " Formulaire " & i & " : " & "form" & i  & ".text.caption"

[Le Pharaon]

Code :

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

1
2
3
4
5
6
7
8
9
10
Dim f As Form
Dim i as integer 
i=1
For Each f In Forms
 
   if f.Name = "form" & i then
     f.nomTextBox ... ' Pour recupérer les infos du textbox
   end if
i=i+1
Next

[Mandarine]

Merci beaucoup.

Actuellement je nai pas mon ordi sous la main pour tester.
Mais c'est exactement ce que je voulais.

Je testerai puis je mettrai résolu.
Merci

[jmfmarques]

Attention toutefois : la collection Forms n'est composée que des Forms effectivement chargées (les autres sont ignorées)

[Mandarine]

L'idée de ton code est ce que je voulais.
J'ai uste ajouté une petite modification car selon ton code "i" évolue à chaque form passée en revue. Or je voulais qu'il évolue qu'une fois la forme désirée est trouvée.

Jai donc mis une boucle sur i qui encadre le for each form et cela marche bien.

Merci

[Le Pharaon]

L'idée de ton code est ce que je voulais.
J'ai uste ajouté une petite modification car selon ton code "i" évolue à chaque form passée en revue. Or je voulais qu'il évolue qu'une fois la forme désirée est trouvée.

Jai donc mis une boucle sur i qui encadre le for each form et cela marche bien.

Merci

C'est vrai j'y songé déjà lorsque j'étais chez moi, sauf que j'ai pas de net à la maison