Applies ToAccess za Microsoft 365 Access 2021 Access 2019 Access 2016

Napomena: Funkcija, metod, objekat ili svojstvo opisano u ovoj temi onemogućena je ako je usluga Microsoft Jet Expression pokrenuta u režimu sandbox, što sprečava procenu potencijalno nebezbednih izraza. Više informacija o režimu "sandbox" potražite u odeljku "režim sandbox" u pomoći.

Vraća dugačak broj koji navodi trenutnu poziciju čitanja/pisanja unutar otvorene datoteke.

Sintaksa

Loc( broj datoteke )

Potrebni broj datotekeargument je bilo koji važeći ceo broj datoteke.

Napomene

Sledeće opisuje povratnu vrednost za svaki režim pristupa datoteci:

Modus

Povratna vrednost

Nasumično

Broj poslednjeg zapisa koji je pročitan ili napisan u datoteci.

Sekvencijalnih

Trenutni položaj bajta u datoteci podeljenoj sa 128. Međutim, informacije koje je vratio Loc za sekvencijalne datoteke ne koriste se niti su potrebne.

Binary

Položaj poslednjeg čitanja ili pisanja bajta.

Primer

Napomena: Primeri koji slede pokazuju upotrebu ove funkcije u Visual Basic for Applications (VBA) modulu. Za više informacija o radu sa VBA modulom izaberite stavku Referenca razvojnog programera sa padajuće liste pored stavke Pretraga i unesite termine u polje za pretragu.

Ovaj primer koristi funkciju Loc za dobijanje trenutne pozicije čitanja/pisanja unutar otvorene datoteke. Ovaj primer pretpostavlja TESTFILE je tekstualna datoteka sa nekoliko redova uzoraka podataka.

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.

Da li vam je potrebna dodatna pomoć?

Želite još opcija?

Istražite pogodnosti pretplate, pregledajte kurseve za obuku, saznajte kako da obezbedite uređaj i još mnogo toga.

Zajednice vam pomažu da postavljate pitanja i odgovarate na pitanja, dajete povratne informacije i čujete mišljenje od stručnjaka sa bogatim znanjem.