Funcția EOF

Important: Acest articol este tradus automat, consultați exonerarea de răspundere. Versiunea în limba engleză a acestui articol se poate găsi aici pentru referință.

Notă: Funcția, metodă, obiecte sau proprietăți cum este descris în acest subiect este dezactivat dacă serviciul de expresie Microsoft Jet se execută în modul sandbox, ceea ce împiedică evaluarea expresii potențial nesigure. Pentru mai multe informații despre modul sandbox, căutați "modul sandbox" în ajutor.

Returnează un număr întreg care conține valoarea BooleanTrue la sfârșitul unui fișier deschis pentru aleatoare sau s-a ajuns secvențiale intrare .

Sintaxă

EOF ( filenumber )

Necesară filenumberargument este un număr întreg care conține toate valide număr fișier.

Observații

Utilizați EOF pentru a evita eroarea generate de încercarea de a obține intrare trecute sfârșitul unui fișier.

Funcția EOF returnează False până la sfârșitul fișierului. Cu fișierele deschise pentru accesul aleatoare sau binar , EOF returnează False până la ultima executată Obțineți instrucțiunea nu este capabilă să citiți o înregistrare întreg.

Cu fișierele deschise pentru acces binar , o încercare de a citi prin intermediul fișierul utilizând funcția de intrare până când EOF returnează True generează o eroare. Utilizați funcțiile LOF și Loc în loc de EOF atunci când citiți fișiere binare cu intraresau utilizați primiți atunci când se utilizează funcția EOF . Cu fișierele deschise pentru un rezultat, EOF returnează întotdeauna True.

Exemplu

Notă: Exemplele care urmează demonstrează utilizarea acestei funcții într-un modul Visual Basic for Applications (VBA). Pentru mai multe informații despre lucrul cu VBA, selectați Referințe pentru dezvoltatori în lista verticală de lângă Căutare și introduceți unul sau mai mulți termeni în caseta de căutare.

Acest exemplu utilizează funcția EOF pentru a detecta sfârșitul unui fișier. Acest exemplu presupune că MYFILE este un fișier text cu câteva linii de text.

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

Notă: Exonerare de răspundere pentru traducere automată: Acest articol a fost tradus de un sistem computerizat, fără intervenție umană. Microsoft oferă aceste traduceri automate pentru a ajuta utilizatorii vorbitori de alte limbi decât engleza să beneficieze de conținutul despre produsele, serviciile și tehnologiile Microsoft. Pentru că articolul a fost tradus de un computer, poate conține erori de vocabular, sintaxă sau gramatică.

Extindeți-vă competențele
Explorați instruirea
Fiți primul care obține noile caracteristici
Alăturați-vă utilizatorilor Office Insider

Au fost utile aceste informații?

Vă mulțumim pentru feedback!

Vă mulțumim pentru feedback! Se pare că ar fi util să luați legătura cu unul dintre agenții noștri de asistență Office.

×