Partage via


Propriété AtEndOfLine

Propriété en lecture seule qui renvoie True si le pointeur de fichier précède immédiatement le marqueur de fin de ligne d’un fichier TextStream, et False si ce n’est pas le cas.

Syntaxe

objet . AtEndOfLine

L’objet est toujours le nom d’un objet TextStream.

Remarques

La propriété AtEndOfLine s’applique uniquement aux fichiers TextStream accessibles en lecture, sinon une erreur se produit.

Le code suivant illustre l’utilisation de la propriété AtEndOfLine .

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

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.