Applies ToAccess za Microsoft 365 Access 2021 Access 2019 Access 2016

Opomba: V tej temi opisana funkcija, metoda, predmet ali lastnost, je onemogočena, če se izvaja storitev Microsoft Jet Expression Service v načinu peskovnika, ki preprečuje vrednotenje morebitno nevarnih izrazov. Za več informacij o načinu peskovnika poiščite »način peskovnika« v pomoči.

Vrne dolgo število, ki določa trenutno mesto za branje/pisanje v odprti datoteki.

Sintaksa

Loc(številka datoteke )

Zahtevana številkaargument je poljubna veljavna številka številka datoteke.

Opombe

V nadaljevanju je opisana vrnjena vrednost za vsak način dostopa do datoteke:

Način

Vrnjena vrednost

Naključno

Število zadnjega prebranega zapisa v datoteki ali zapisanega v datoteki.

Zaporedna

Mesto trenutnega bajta v datoteki deljeno z 128. Vendar informacije, ki jih funkcija Loc vrne za zaporedne datoteke, niso niti uporabljene niti zahtevane.

Dvojiško

Mesto zadnjega prebranega ali zapisanega bajta.

Primer

Opomba: V spodnjih primerih je prikazana uporaba te funkcije v modulu Visual Basic for Applications (VBA). Če želite več informacij o delu z modulom VBA, izberite Vsebina za razvijalce na spustnem seznamu ob možnosti Iskanje in v iskalno polje vnesite enega ali več izrazov.

V tem primeru se funkcija Loc uporablja za vrnitev trenutnega položaja za branje/pisanje v odprti datoteki. V tem primeru se predvideva, da je TESTFILE besedilna datoteka z nekaj vrsticami vzorčnih podatkov.

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.

Ali potrebujete dodatno pomoč?

Ali želite več možnosti?

Raziščite ugodnosti naročnine, prebrskajte izobraževalne tečaje, preberite, kako zaščitite svojo napravo in še več.

Skupnosti vam pomagajo postaviti vprašanja in odgovoriti nanje, posredovati povratne informacije in prisluhniti strokovnjakom z bogatim znanjem.