Funzione EOF

Importante :  Il presente articolo è stato tradotto automaticamente, vedere la dichiarazione di non responsabilità. Per visualizzare la versione inglese dell'articolo, fare clic qui.

Nota : La funzione, il metodo, la proprietà o l'oggetto descritto in questo argomento è disabilitato se Microsoft Jet Expression Service è in esecuzione in modalità sandbox, che impedisce la valutazione delle espressioni potenzialmente pericolose. Per altre informazioni sulla modalità sandbox, cercare "modalità sandbox" nella Guida.

Restituisce un Integer che contiene il valore di booleanoTrue quando viene raggiunta sequenziale Input o la fine di un file aperto in casuale .

Sintassi

EOF ( numfile )

Il obbligatorio numfileargomento è un numero intero contenente qualsiasi valido numero di file.

Osservazioni

Utilizzare la funzione EOF per evitare l'errore generato dal tentativo di recuperare input dopo la fine di un file.

La funzione EOF restituisce Falso finché non viene raggiunta la fine del file. Con i file aperti per l'accesso casuale o binario , EOF restituisce Falso fino a quando l'ultima istruzione Get eseguita in grado di leggere un intero record.

Con i file aperti per l'accesso binario , un tentativo di leggere il file utilizzando la funzione Input finché EOF restituisce True genera un errore. Usare le funzioni LOF e Loc anziché EOF durante la lettura di file binari con Inputoppure utilizzare visualizzato quando si utilizza la funzione EOF . Con i file aperti per l'Output, EOF restituisce sempre True.

Esempio

Nota : Gli esempi seguenti illustrano l'uso di questa funzione in un modulo di Visual Basic, Applications Edition (VBA). Per altre informazioni sull'uso di VBA, selezionare Riferimenti per sviluppatori nell'elenco a discesa accanto a Cerca e immettere uno o più termini nella casella di ricerca.

Questo esempio viene usata la funzione EOF per individuare la fine di un file. In questo esempio si presuppone che MYFILE è un file di testo con alcune righe di testo.

Dim InputData
' Open file for input.
Open "MYFILE" For Input As #1
' Check for end of file.
Do While Not EOF(1)
' Read line of data.
Line Input #1, InputData
' Print to the Immediate window.
Debug.Print InputData
Loop
' Close file.
Close #1

Nota : Dichiarazione di non responsabilità per la traduzione automatica: Il presente articolo è stato tradotto tramite un software di traduzione automatica e non da una persona. Microsoft offre le traduzioni automatiche per consentire a coloro che non conoscono la lingua inglese di leggere gli articoli sui prodotti, sui servizi e sulle tecnologie Microsoft. Dal momento che l'articolo è stato tradotto automaticamente, potrebbe contenere errori di sintassi, di grammatica o di utilizzo dei vocaboli.

Amplia le tue competenze
Esplora i corsi di formazione
Ottieni in anticipo le nuove caratteristiche
Partecipa al programma Office Insider

Queste informazioni sono risultate utili?

Grazie per i tuoi commenti e suggerimenti

Grazie per il tuo feedback! Potrebbe essere utile metterti in contatto con uno dei nostri operatori del supporto di Office.

×