Hinweis
Die in diesem Thema beschriebene Funktion, Methode, das Objekt oder die Eigenschaft ist deaktiviert, wenn der Microsoft Jet-Ausdrucksdienst im Sandkastenmodus ausgeführt wird, der die Auswertung potenziell unsicherer Ausdrücke verhindert. Weitere Informationen zum Sandboxmodus finden Sie, wenn Sie in der Hilfe nach "Sandboxmodus" suchen.
Gibt einen "Long"-Wert zurück, der die Größe einer Datei in Bytes darstellt , die mit der Open-Anweisung geöffnet wurde.
Syntax
LOF(Dateinummer)
Das erforderlicheDateinummernargument ist eine ganze Zahl, die eine gültige Dateinummer enthält.
Hinweis
Verwenden Sie die Funktion FileLen , um die Länge einer Datei zu ermitteln, die nicht geöffnet ist.
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 LOF-Funktion verwendet, um die Größe einer geöffneten Datei zu bestimmen. In diesem Beispiel wird davon ausgegangen, dass es sich um eine Textdatei mit Beispieldaten handelt.TESTFILE
Dim FileLength
Open "TESTFILE" For Input As #1 ' Open file.
FileLength = LOF(1) ' Get length of file.
Close #1 ' Close file.