Applies ToMicrosoft 365 rakendus Access Access 2021 Access 2019 Access 2016

Märkus.: Kui Microsoft Jet Expression Service töötab liivakastirežiimis, mis takistab potentsiaalselt ebaturvaliste avaldiste väärtustamist, on käesolevas artiklis kirjeldatud funktsioon, meetod, objekt või atribuut keelatud. Liivakastirežiimi kohta lisateabe saamiseks otsige spikrist sõna „liivakastirežiim“.

Tagastab väärtuse Pikk, mis määrab avatud failis praeguse lugemis-/kirjutamispositsiooni.

Süntaks

Loc( failinumber )

Nõutav failinumberargument on mis tahes kehtiv täisarv failinumber.

Kommentaarid

Järgmises artiklis kirjeldatakse iga failipääsurežiimi tagastusväärtust.

Režiim

Tagastusväärtus

Juhuslik

Viimase failist loetud või faili kirjutatud kirje number.

Järjestikune

Praegune baitpositsioon failis, mis on jagatud arvuga 128. Siiski ei kasutata ega nõuta Loc-i poolt järjestikuste failide kohta tagastatud teavet.

Binaarväärtus

Viimase loetud või kirjutatud baiti asukoht.

Näide

Märkus.: Järgmised näited kujutavad selle funktsiooni kasutamist rakenduse Visual Basic for Applications (VBA) moodulis. Lisateabe saamiseks VBA-ga töötamise kohta valige välja Otsing kõrval kuvatavast ripploendist väärtus Tootearendusmaterjal ja sisestage otsinguväljale üks või mitu sõna.

Selles näites kasutatakse funktsiooni Loc , et tagastada avatud failis praegune lugemis-/kirjutamispositsioon. Selles näites eeldatakse, et TESTFILE on mõne rea näidisandmetega tekstifail.

Dim MyLocation, MyLine' Open file just created.Open "TESTFILE" For Binary As #1' Loop until end of file.Do While MyLocation < LOF(1)        ' Read character into variable.    MyLine = MyLine & Input(1, #1)        ' Get current position within file.    MyLocation = Loc(1)        ' Print to the Immediate window.    Debug.Print MyLine; Tab; MyLocationLoopClose #1    ' Close file.

Kas vajate veel abi?

Kas soovite rohkem valikuvariante?

Siin saate tutvuda tellimusega kaasnevate eelistega, sirvida koolituskursusi, õppida seadet kaitsma ja teha veel palju muud.

Kogukonnad aitavad teil küsimusi esitada ja neile vastuseid saada, anda tagasisidet ja saada nõu rikkalike teadmistega asjatundjatelt.