[VB6]: Accodare elementi di una ListBox in una TextBox

[stee]

Ciao a tutti, avrei un problema che non riesco a risolvere, nonostante abbia fatto anche una ricerca nei vari forum.
Ho una listbox piena di elementi, come segue:

elemento1
elemento2
...ecc...

Io dovrei praticamente estrarre elemento per elemento e metterlo in un textbox multiriga.
Ho provato a scrivere questo codice:

For I = 1 To List1.ListCount - 1
Text2.Text = " " & List1.List(I)
Next

ma non funziona, perché mi mette nella textbox solo l'ultimo elemento della listbox inserito.
Come faccio a metterli tutti nella textbox?
Sarà una cosa banale, ma non riesco (anzi, quasi me ne vergogno, visto che di VB sono abbastanza pratico e che lo uso da anni!!)!
Grazie!
Ste

[Seyen]

Infatti l'errore è stupidissimo

Text2.Text = Text2.Text & " " & List1.List(I)

Così dovrebbe andare

[oregon]

Dato che la textbox e' multiline penso che si vogliano disporre gli elementi così

    Text2.Text = ""
    For i = 0 To List1.ListCount - 1
        Text2.Text = Text2.Text & List1.List(i) & vbCrLf
    Next i

[stee]

No comment, mi sa che la vecchiaia avanza.......
Grazie mille per l'aiuto!
Ste