Fin de Archivo lectura secuencial en VB.NET
Cuando se lee secuencialmente un archivo en VB.NET, el apuntador se pone en fin de archivo cuando el el último regitro, contratio a Cobol que lo pone hasta que llega al fin de archivo
Cobol VB.NET
XXXXXX XXXXXX
YYYYYY YYYYYY <-- Apuntador
Para resolver el punto cuando la lectura se hace hacia el final del proceso (al principio del proceso no tiene problema porque se lee el registro, se procesa y despues se pregunta) se debe manejar el fin de archivo de la siguiente manera
While Lineatexto1 is not Nothing
Proceso....
If not eof(1)
lineatexto = lineinput(1)
else
lineatexto = Nothing
endif