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
...