Dannato sia questo forum...
Stavo scrivendo che se usi VB6.0 per aprire un file di testo composto da righe con CR alla fine ti basta un semplice:
...
Open path_del_file & "\testo.txt" For Input As 1
Do
Input #1, linea
Text1.Text = Text1 & linea & vbCrLf
Loop Until EOF(1) = True
Close #1
...
ad ogni input #1 ti porti via una linea...
Chip