EOF, funksjon

Viktig: Denne artikkelen er maskinoversatt, se ansvarsfraskrivelsen. Du finner den engelske versjonen av artikkelen her som referanse.

Merknad: Funksjonen, metoden, objektet eller egenskapen som er beskrevet i dette emnet er deaktivert hvis Microsoft Jet Expression Service kjører i sandkassemodus, som hindrer evaluering av potensielt usikre uttrykk. Hvis du vil ha mer informasjon om sandkassemodus, kan du søke etter "sandkassemodus" i Hjelp.

Returnerer et heltall som inneholder Boolsk verdien Sann når slutten av en fil som er åpnet for tilfeldig eller sekvensielle inndata er nådd.

Syntaks

EOF ( filnummer )

Obligatorisk filnummerargument er et heltall som inneholder en hvilken som helst gyldig filnummer.

Merknader

Bruk EOF til å unngå feilen som genereres ved forsøk på å registrere inndata etter slutten av en fil.

EOF -funksjonen returnerer Usann til slutten av filen er nådd. Med filer åpnet for tilfeldig eller binær tilgang, returnerer EOFUsann til sist utførte setningen ikke kan lese hele posten.

Med filer åpnet for binær tilgang, genererer et forsøk på å lese gjennom filen med Input -funksjonen til EOF returnerer Sann en feil. Bruk funksjonene LOF og Loc i stedet for EOF når du leser binære filer med inndata, eller Bruk når du bruker EOF -funksjonen. Med filer åpnet for utdata, returnerer EOF alltid Sann.

Eksempel

Merknad: I eksemplene nedenfor vises bruken av denne funksjonen i en VBA-modul (Visual Basic for Applications). Hvis du vil ha mer informasjon om hvordan du arbeider med VBA, velger du Utviklerreferanse fra rullegardinlisten ved siden av Søk og skriver inn ett eller flere søkeord i søkeboksen.

Dette eksemplet brukes EOF -funksjonen til å oppdage slutten av en fil. Dette eksemplet forutsetter at MYFILE er en tekstfil med noen få linjer med tekst.

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

Merknad: Ansvarsfraskrivelse for maskinoversettelse: Denne artikkelen er oversatt av et datasystem i stedet for en oversetter. Microsoft tilbyr disse maskinoversettelsene slik at brukere som ikke snakker engelsk, får tilgang til innhold om Microsoft-produkter, -tjenester og –teknologier. Ettersom artikkelen er maskinoversatt, kan den inneholde feil i vokabular, syntaks eller grammatikk.

Utvid ferdighetene dine
Utforsk opplæring
Vær først ute med de nye funksjonene
Bli med i Office Insiders

Var denne informasjonen nyttig?

Takk for tilbakemeldingen!

Takk for tilbakemeldingen! Det høres ut som det kan være lurt å sette deg i kontakt med én av våre Office-kundestøtteagenter.

×