Differenze tra le versioni di "Eof"
Da Gambas-it.org - Wikipedia.
| Riga 1: | Riga 1: | ||
| − | La funzione '''Eof''' restituisce il valore booleano di ''vero'', se si è guinti alla fine del file. | + | La funzione '''Eof()''' restituisce il valore booleano di ''vero'', se si è guinti alla fine del file. |
La sintassi è: | La sintassi è: | ||
| Riga 11: | Riga 11: | ||
Dim linea As String | Dim linea As String | ||
| − | + | fl = Open "<FONT Color=gray>''/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> | ||
| − | + | While Not <FONT color=#B22222>Eof</font>(fl) | |
<FONT color=gray>' ''...legge una riga del file di testo...''</font> | <FONT color=gray>' ''...legge una riga del file di testo...''</font> | ||
| − | + | Line Input #fl, linea | |
<FONT color=gray>' ''...e la mostra in console:''</font> | <FONT color=gray>' ''...e la mostra in console:''</font> | ||
| − | + | Print linea | |
| − | + | Wend | |
| − | + | fl.Close | |
'''End''' | '''End''' | ||
Versione delle 02:31, 2 set 2022
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
