Visual Basic - manejo de un TXT

Necesito leer un fichero, el fichero es un TXT. La infomacion esta en linias, pero sin delimitadores, la longitud d las linias tb es variable.
Lo que quiero hacer es leer una linia, guardarla en una var., y que cuando continue leyendo me continue en la siguiente linia

Espero puedan ayudarme
Un saludo

Prueba con esto
Open txtFichero For Input As #1

Do While Not EOF(1)
'Voy leyendo cada linea
Line Input #1, LineaTexto

Loop
Close #1