Befehlsreferenz - Dateisystem: Loc-Funktion

VB-Versionen:    VB4   |    VB5   |    VB6

Beschreibung:
Die Loc-Funktion gibt die aktuelle Schreib-/Leseposition in einer geöffneten Datei zurück.

Syntax:

Loc (Dateinummer)

Parameter:

Dateinummer

(Integer) Nummer der geöffneten Datei, bei der die aktuelle Schreib-/Leseposition bestimmt werden soll.

Beispiel:

Private Sub Command1_Click()
    Dim Position, Zeile
    Open "c:\Eigene Dateien\Test.txt" For Binary As #1
    Do While Not EOF(1)
        Zeile = Zeile & Input(1, #1)
        Position = Loc(1)   ' Position in geöffneter Datei bestimmen
    Loop
    MsgBox "Position des letzten gelesenen oder geschriebenen Bytes ist " & Loc(1)
    Close #1
End Sub

Siehe auch:

LOF-Funktion  FileLen-Funktion