Funkcija EOF

Napomena:  Željeli bismo vam pružiti najnoviji sadržaj pomoći što je brže moguće i to na vašem jeziku. Ova je stranica strojno prevedena te može sadržavati gramatičke pogreške ili netočnosti. Naša je namjera da vam ovaj sadržaj bude koristan. Možete li nam pri dnu ove stranice javiti jesu li vam ove informacije bile korisne? Kao referencu možete pogledati i članak na engleskom jeziku .

Napomena: Funkcija, način, objekt ili svojstvo koje su opisane u ovoj temi onemogućeno je ako Microsoft Jet Expression Service izvodi u načinu rada s memorijom za testiranje, što sprječava potencijalno nesigurnih izraza. Dodatne informacije o načinu rada s memorijom za testiranje ključnoj riječi "način rada s memorijom za testiranje" u sustavu pomoći.

Vraća cijeli broj koji sadrži booleovski vrijednost True kad kraj datoteke otvoren za slučajno ili postane uzastopnih unos .

Sintaksa

EOF ( filenumber )

Potrebne filenumberargument je cijeli broj koji sadrže bilo koji valjani broj datoteke.

Napomene

Koristite EOF za izbjegavanje pogrešaka koje nastaju unos nakon kraja datoteke.

Funkcija EOF vraća False dok je dostigne kraj datoteke. S datotekama otvorenima za pristup slučajno ili Binarni , EOF vraća False dok posljednji izvršava se naredba ne može čitati cijeli zapis.

S datotekama otvorenima za Binarni pristup, pokušaj čitanja datoteke korištenjem funkcije Input dok EOF vraća vrijednost True generira pogrešku. Koristite funkcije LOF i Loc umjesto EOF prilikom čitanja binarne datoteke s unosili se kada se koristi funkcija EOF . S datotekama otvorenima za Izlaz, EOF uvijek vraća True.

Primjer

Napomena: Primjeri koji slijede prikazuju korištenje te funkcije u modulu jezika Visual Basic for Applications (VBA). Da biste pronašli dodatne informacije o radu s VBA-om, na padajućem popisu uz stavku Traži odaberite stavku Referenca za razvojne inženjere pa unesite jedan ili više izraza u okvir pretraživanja.

U ovom se primjeru koristi funkcija EOF da biste otkrili kraj datoteke. U ovom se primjeru pretpostavlja da MYFILE je tekstna datoteka s nekoliko redaka teksta.

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
Proširite svoje vještine korištenja sustava Office
Istražite osposobljavanje

Jesu li vam ove informacije bile korisne?

Hvala vam na povratnim informacijama!

Hvala vam na povratnim informacijama! Čini se da bi vam pomoglo kad bismo vas povezali s nekim od naših agenata podrške za Office.

×