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.