codice:
    Open (strpath) For Input As #1
        Do While Not EOF(1)
            Line Input #1, riga
        Loop
    Close #1
così leggi tutto il file riga per riga
elabora poi ogni riga nel modo in cui ti serve