EOF funkcija

Svarbu :  Šis straipsnis išverstas naudojant mašininį vertimą, žr. atsakomybės atsisakymą. Su šio straipsnio versija anglų kalba galite susipažinti čia .

Pastaba : Funkcija, metodą, objektų ir ypatybių šioje temoje aprašyta yra išjungta, jei Microsoft Jet išraiškų tarnyba veikia smėlio dėžės režimą, kuris trukdo galimai nesaugių reiškinių įvertinti. Daugiau informacijos apie smėlio dėžės režimą, ieškokite "smėlio dėžės režimo" žinyne.

Pateikia sveikąjį skaičių su bulio logika reikšmę TRUE (teisinga) , kai failo pabaigoje atidaryta atsitiktinis arba sekos įvesties pasiekė.

Sintaksė

EOF ( failo numeris )

Būtinas failo numerisargumentas yra sveikasis skaičius , turinčių bet neleistina failo numeris.

Pastabos

Naudokite EOF būtų išvengta klaidų, sukurtas bando gauti įvesties ankstesnes failo pabaigoje.

EOF funkcija pateikia False iki pabaigos failą. Failai, atidaromi atsitiktinis arba dvejetainis prieigos, EOF pateikia FALSE (klaidinga) , kol paskutinis sakinys gauti įvykdytas yra neįmanoma perskaityti visą įrašą.

Su failai, atidaromi dvejetainis prieigos, bandant perskaityti failą naudodami funkciją įvestiesEOF grąžina TRUE (teisinga) , kol generuoja klaida. Naudokite funkcijas LOF ir Loc vietoj EOF skaitant dvejetainius failus su įvestiesarba naudoti gauti naudojant funkciją EOF . Failai, atidaromi išvesčiai, EOF visada pateikia TRUE (teisinga).

Pavyzdys

Pastaba : Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.

Šiame pavyzdyje naudojama funkcija EOF nustatyti failo pabaigoje. Šiame pavyzdyje daroma prielaida, kad MYFILE yra tekstinio failo kelias teksto eilutes.

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

Pastaba : Mašininio vertimo atsakomybės atsisakymas: Šis straipsnis išverstas naudojant kompiuterinę sistemą be žmogaus įsikišimo. „Microsoft“ pateikia šiuos mašininius vertimus norėdama padėti anglų kalbos nesuprantantiems vartotojams perskaityti turinį apie „Microsoft“ produktus, paslaugas ir technologijas. Šis straipsnis išverstas mašininio vertimo būdu, todėl jame gali būti žodyno, sintaksės ar gramatikos klaidų.

Tobulinkite savo įgūdžius
Ieškoti mokymo
Pirmiausia gaukite naujų funkcijų
Prisijunkite prie „Office Insider“ dalyvių

Ar ši informacija buvo naudinga?

Dėkojame už jūsų atsiliepimus!

Dėkojame už jūsų atsiliepimą! Panašu, kad gali būti naudinga jus sujungti su vienu iš mūsų „Office“ palaikymo agentų.

×