[VB6] Comment boucler sur des controls d'un form ?

J'ai 20 champs textes de Text1 à Text20

Je voudrais boucler pour récupérer leurs valeurs au lieu d'écrire les 20 lignes :

recup(0) = text1.Value
recup(1) = text2.Value
recup(2) = text3.Value
...

Un truc du genre...

Code:

---

1 2 3 4 5

Dim i as Integer   For i = 0 to 19 recup(i)=Controls("Text" & i+1).Value Next

---

Merci :)

Hum ... et si on veut rajouter des index après "controls", quelle serait la syntaxe ?

For Each Control in Me
Code...
Next

Code:

---

1 2 3

For Each Control in Me.controls Code... Next

---

pour être plus précis .... collection de controles de la form = me.controls


puis dans le code tu fais un test sur le typeof ou le tag de tes controles, je m'en sert pour faire des fausses form en mode modal, c'est a dire je desactive tous les controles sauf ceux qui m'intéressent par niveau en leur attribuant une valeur dans le tag et je fais un test sur la valeur ...