Freigeben über


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.