AtEndOfLine, propriété

Renvoie la valeur True si le pointeur de fichier est positionné immédiatement après le marqueur de fin de ligne d'un fichier TextStream. La valeur False est renvoyée dans le cas contraire. En lecture seule.

object.AtEndOfLine

L'espace réservé object correspond toujours à un nom d'objet TextStream.

Notes

La propriété AtEndOfLine s'applique uniquement aux fichiers TextStream qui sont ouverts en lecture ; sinon, une erreur se produit.

Le code suivant illustre l'emploi de la propriété AtEndOfLine :

Function ReadEntireFile(filespec)
   Const ForReading = 1
   Dim fso, theFile, retstring
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set theFile = fso.OpenTextFile(filespec, ForReading, False)
   Do While theFile.AtEndOfLine <> True
      retstring = theFile.Read(1)
   Loop
   theFile.Close
   ReadEntireFile = retstring
End Function

Voir aussi

AtEndOfStream, propriété | Column, propriété | Line, propriété

Application: TextStream, objet