[VB6] riempimento di più textbox con un ciclo

[orione91]

Ho creato un form contenente una listbox a colonne multiple e svariati textbox (per adesso sono 90). I textbox vengono riempiti quando l'utente seleziona una riga dalla listbox.
Adesso nel codice sono elencati tutti i textbox, quindi risulta pesante, aggiornabile con difficoltà e poco elegante.
E' possibile riempire i textbox (diciamo da 1 a 90) con un ciclo?
Grazie,
Orione91

[SimoneVB]

Ciao !
Hai due possibilità:
1) Fai in modo che le TextBox appartengano ad un'array di controlli.
Es: txtText(0), txtText(1), etc...

Ricreando questa situazione puoi permetterti un ciclo For...Next
da 1 a 90 (o da 0 a 89). Sta poi a te puntare su determinate caratteristiche (ammesso che ce ne siano) che ti permettano di risalire all'Index della TextBox dato il valore che dovrai assegnarle...
Per intenderci, qualcosa tipo:
txtText(List1.ListIndex) = List1.List(List1.ListIndex)

2)
Altrimenti un ciclo For Each...Next per ciclare su tutte le TextBox del form. Ma anche in questo caso dovrai disporre di qualche informazione che ti permetta di determinare il nome della TextBox in questione.

Ciao
Simo