Cerca ne forum, è già stato risolto.
In tutti i casi l'istruzione chiave è "Line Input".
Direttamente da MSDN :
Istruzione Line Input #
Legge una singola riga in un file aperto ad accesso sequenziale e la assegna a unavariabileString.
Sintassi
Line Input #numerofile, nomevariabile
La sintassi dell'istruzione Line Input # è composta dalle seguenti parti:
Parte Descrizione
numerofile Obbligatoria. Qualsiasinumero di file valido.
nomevariabile Obbligatoria. QualsiasiVariant o nome di variabile String valido.
Osservazioni
I dati letti tramite Line Input # vengono in genere scritti su file con Print #.
L'istruzione Line Input # consente di leggere tutti i caratteri in un file un carattere per volta, fino al ritorno a capo (Chr(13)) o alla sequenza ritorno a capo–avanzamento riga (Chr(13) + Chr(10)). Le sequenze ritorno a capo–avanzamento riga vengono ignorate e non aggiunte alla stringa di caratteri.
Con esempio :
codice:
Dim TextLine
Open "FILEPROV" For Input As #1 ' Apre il file.
Do While Not EOF(1) ' Ripete fino alla fine del file.
Line Input #1, TextLine ' Assegna la riga a una variabile.
Debug.Print TextLine ' Scrive nella finestra Immediata.
Loop
Close #1 ' Chiude il file.
Ciao,