EOF-Funktion

Wichtig :  Dieser Artikel wurde maschinell übersetzt. Bitte beachten Sie den Haftungsausschluss. Die englische Version des Artikels ist als Referenz hier verfügbar: hier.

Hinweis : Die Funktion, die Methode, das Objekt oder die Eigenschaft, die bzw. das in diesem Thema erläutert wird, ist deaktiviert, falls der Ausdrucksdienst in Microsoft Jet im geschützten Modus (Sandbox Mode) ausgeführt wird. In diesem Modus wird die Auswertung von potenziell unsicheren Ausdrücken verhindert. Weitere Informationen zum geschützten Modus erhalten Sie, wenn Sie in der Hilfe nach "sandbox mode" suchen.

Gibt eine ganze Zahl, die den Boolesch Wert true, Wenn das Ende einer Datei für verteilte geöffnet oder sequenzielle Eingabe erreicht enthält.

Syntax

EOF( filenumber )

Das erforderliche Argumentfilenumber ist eine ganze Zahl, die eine beliebige gültige Dateinummer enthält.

Hinweise

Verwenden Sie EOF, um den Fehler zu vermeiden, der durch den Versuch generiert wurde, nach dem Ende einer Datei eine Eingabe zu machen.

Die EOF-Funktion gibt Falsch zurück, bis das Ende der Datei erreicht wurde. Bei Dateien, die für den zufälligen oder binären Zugriff geöffnet werden, gibt EOF den Wert Falsch zurück, bis die zuletzt ausgeführte Get-Anweisung einen gesamten Datensatz nicht lesen kann.

Wenn die Dateien für den binären Zugriff geöffnet sind, generiert der Versuch, die Datei mit der Eingabe-Funktion zu lesen, bis EOF den Wert Wahr ausgibt, einen Fehler. Verwenden Sie die LOF- und Loc-Funktionen statt der EOF-Funktion, wenn Sie binäre Dateien mit Eingabe lesen, oder verwenden Sie Get, wenn Sie die EOF-Funktion verwenden. Wenn Dateien für die Ausgabe geöffnet sind, gibt EOF immer Wahr aus.

Beispiel

Hinweis : Die folgenden Beispiele zeigen die Verwendung dieser Funktion in einem VBA-Modul (Visual Basic for Applications). Wenn Sie weitere Informationen zum Arbeiten mit VBA wünschen, wählen Sie Entwicklerreferenz in der Dropdownliste neben Suchen aus, und geben Sie einen oder mehrere Begriffe in das Suchfeld ein.

In diesem Beispiel wird die EOF-Funktion zum Erkennen des Endes einer Datei verwendet. In diesem Beispiel wird vorausgesetzt, dass MYFILE eine Textdatei mit einigen wenigen Textzeilen ist.

Dim InputData
' Open file for input.
Open "MYFILE" For Input As #1
' Check for end of file.
Do While Not EOF(1)
' Read line of data.
Line Input #1, InputData
' Print to the Immediate window.
Debug.Print InputData
Loop
' Close file.
Close #1

Hinweis : Haftungsausschluss für maschinelle Übersetzungen: Dieser Artikel wurde mithilfe eines Computersystems und ohne jegliche Bearbeitung durch Personen übersetzt. Microsoft bietet solche maschinellen Übersetzungen als Hilfestellung für Benutzer ohne Englischkenntnisse an, damit Sie von den Informationen zu Produkten, Diensten und Technologien von Microsoft profitieren können. Da es sich bei diesem Artikel um eine maschinelle Übersetzung handelt, enthält er möglicherweise Fehler in Bezug auf (Fach-)Terminologie, Syntax und/oder Grammatik.

Teilen Facebook Facebook Twitter Twitter E-Mail E-Mail

War diese Information hilfreich?

Sehr gut. Noch anderes Feedback?

Was können wir verbessern?

Vielen Dank für Ihr Feedback!

×