Visual Basic - como recorro archivo de texto

Gracias

Proba con el siguiente codigo.
(Tenes que tenes la referencia Micosoft Scripting Runtime)

Dim a as Scripting.FileSystemObject
Dim b as TextStream
dim aux as String

set a= New Scripting.FileSystemObject
set b=a.OPenTextFile(Path)

While not b.AtEndOfLine
aux=b.readline (en aux se guarda una linea del archivo)

wend

b.close