Eof

Da Gambas-it.org - Wikipedia.

La funzione Eof() restituisce il valore booleano di vero, se si è guinti alla fine del file.

La sintassi è:

fineFile = Eof(file)


Esempio:

Public Sub Main()

 Dim fl As File
 Dim linea As String

 fl = Open "/percorso/del/file" For Read

' Finché non si è guinti alla fine del file...
 While Not Eof(fl)
' ...legge una riga del file di testo...
   Line Input #fl, linea
' ...e la mostra in console:
   Print linea
 Wend

 fl.Close

End