[vb6] far scorrere file di testo

[Beziel]

Avendo aperto un file di testo in questo modo:
open commondialog1.filename for input as #1

Come lo faccio scorrere linea x linea?

[Foga27News]

Sono stati aperti 1000 3d x questa cosa.
cerca nelle pag. precedenti.

cmq:

lineinpput #1, str

[Beziel]

Ti ricordo che la ricerca non funziona cmq tnx!!!

[Beziel]

si ma non dovrei metterlo dentro un ciclo?!?

[Foga27News]

dim tmp as string
Text1.MultiLine as string
Open NomeFile for input as #1
Do Until EOF(1)
   Line input #1,tmp
   text1.text = text1.text & tmp & vbNewLine
loop

[Beziel]

grazie