LOF-Funktion

Článek
09/02/2008

Aktualisiert: November 2007

Gibt einen Long-Wert zurück, der den Umfang einer mit der FileOpen-Funktion geöffneten Datei in Bytes wiedergibt.

Das My-Feature ermöglicht bei Datei-E/A-Vorgängen höhere Produktivität und Leistung als LOF. Weitere Informationen finden Sie unter My.Computer.FileSystem-Objekt.

Public Function LOF(ByVal FileNumber As Integer) As Long

Parameter

FileNumber
Erforderlich. Ein Integer-Wert mit einer gültigen Dateinummer.

Ausnahmen

Ausnahmetyp	Fehlernummer	Bedingung
IOException	52	FileNumber ist nicht vorhanden.
IOException	54	Dateimodus ist ungültig.

Beachten Sie die Spalte "Fehlernummer", wenn Sie Visual Basic 6.0-Anwendungen aktualisieren, die eine unstrukturierte Fehlerbehandlung verwenden. (Sie können die Fehlernummer mit der Number-Eigenschaft (Err-Objekt) vergleichen.) Wenn möglich, sollten Sie jedoch erwägen, eine solche Fehlersteuerung durch eine Übersicht über die strukturierte Ausnahmebehandlung für Visual Basic zu ersetzen.

Hinweise

Sie können die Länge einer nicht geöffneten Datei mit der FileLen-Funktion feststellen.

Beispiel

In diesem Beispiel wird mit der LOF-Funktion die Größe einer geöffneten Datei auf einem Datenträger bestimmt. In diesem Beispiel ist TestFile eine Textdatei mit Beispieldaten.

Dim length As Long
FileOpen(1, "C:\TESTFILE.TXT", OpenMode.Input) ' Open file.
length = LOF(1)   ' Get length of file.
MsgBox(length)
FileClose(1)   ' Close file.