Eof
Da Gambas-it.org - Wikipedia.
La funzione Eof() restituisce il valore booleano di vero, se si è guinti alla fine del file.
La sintassi è:
Eof(file) As Boolean
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
