Differenze tra le versioni di "Eof"
Da Gambas-it.org - Wikipedia.
| Riga 4: | Riga 4: | ||
Eof(file) As Boolean | Eof(file) As Boolean | ||
Esempio: | Esempio: | ||
| − | + | Public Sub Main() | |
Dim fl As File | Dim fl As File | ||
Dim linea As String | Dim linea As String | ||
| − | fl = Open "<FONT Color= | + | fl = Open "<FONT Color=darkgreen>''/percorso/del/file''</font>" For Read |
<FONT color=gray>' ''Finché non si è guinti alla fine del file...''</font> | <FONT color=gray>' ''Finché non si è guinti alla fine del file...''</font> | ||
| Riga 21: | Riga 21: | ||
fl.Close | fl.Close | ||
| − | + | End | |
Versione attuale delle 15:48, 10 giu 2024
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
