AtEndOfLine (Propiedad)

Visual Basic VBLR

AtEndOfLine (Propiedad)

           

Descripción

Propiedad de sólo lectura que devuelve True si el puntero del archivo precede inmediatamente al marcador de final de línea en un archivo TextStream. Devuelve False si no le precede.

Sintaxis

objeto.AtEndOfLine

El objeto siempre es el nombre de un objeto TextStream.

Comentarios

La propiedad AtEndOfLine sólo es aplicable a los archivos TextStream que están abiertos para lectura; si no, se produce un error.

El código siguiente demuestra la utilización de la propiedad AtEndOfLine:

Dim fs, a, retstring
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.OpenTextFile("c:\archivoprueba.txt", ForReading, False)
Do While a.AtEndOfLine <> True
    retstring = a.Read(1)
    ...
Loop
a.Close