AtEndOfStream-Eigenschaft
Schreibgeschützte Eigenschaft, die True zurückgibt, wenn sich der Dateizeiger am Ende einer TextStream-Datei befindet. Wenn er sich nicht am Ende befindet, wird False zurückgegeben.
Syntax
-Objekt.AtEndOfStream
Das -Objekt ist immer der Name eines TextStream-Objekts .
Hinweise
Die AtEndOfStream-Eigenschaft gilt nur für TextStream-Dateien, die zum Lesen geöffnet sind. Andernfalls tritt ein Fehler auf.
Der folgende Code veranschaulicht die Verwendung der AtEndOfStream-Eigenschaft .
Dim fs, a, retstring
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.OpenTextFile("c:\testfile.txt", ForReading, False)
Do While a.AtEndOfStream <> True
retstring = a.ReadLine
...
Loop
a.Close
Siehe auch
Support und Feedback
Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.