Lof

La funzione Lof restituisce la lunghezza di un file aperto.

La sintassi è:

lughezzaFile = Lof(file)

Esempio:

Public Sub Button1_Click()

 Dim fl As File

  fl = Open "percorso_file" For Read

  Print "La lunghezza del file è: "; Lof(fl)

End

Se il flusso non è un file, bensì un processo, allora la funzione Lof restituisce il numero di byte che possono essere letti con una sola volta:

Public Sub processo_Read()

 Dim b As String

  Read #Last, b, Lof(Last)

End