Funkcija Loc

Pomembno : Besedilo članka je prevedeno strojno. Glejte zavrnitev odgovornosti. Angleško različico tega članka najdete tukaj .

Opomba : Ta funkcija, metoda, predmet ali lastnost, opisana v tej temi, je onemogočena, če se Microsoft Jetova storitev za izraze izvaja v načinu osnovnih varnostnih omejitev, kar preprečuje ocenitev potencialno nevarnih izrazov. Za več informacij o načinu osnovnih varnostnih omejitev, v pomoči poiščite »način osnovnih varnostnih omejitev« (sandbox mode).

Vrne podatek tipa Dolgo, ki določa trenutni položaj za branje/pisanje v odprti datoteki.

Sintaksa

Loc( številkadatoteke )

Zahtevani filenumberargument je kateri koli veljaven celo številka datoteke.

Opombe

Vrnjene vrednosti za način dostopa vsake datoteke so opisane tukaj:

Način

Vrnjena vrednost

Naključno

Številka zadnjega zapisa, branega iz ali zapisanega v datoteko.

Zaporedno

Trenutno bajtno mesto v datoteki, ki je deljena s 128. Podatki, ki jih funkcija Loc vrne za zaporedne datoteke, se ne uporabijo in niso zahtevani.

Dvojiško

Mesto zadnjega branega 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 funkcija Loc vrne trenutno mesto branja/pisanja v odprti datoteki. Primer predpostavlja, 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; MyLocation
Loop
Close #1 ' Close file.

Opomba : Strojni prevod – zavrnitev odgovornosti: Ta članek je bil preveden z računalniškim programom brez človeškega posredovanja. Microsoft skuša s strojno prevedenimi članki vsebino o Microsoftovih izdelkih, storitvah in tehnologijah približati osebam, ki ne razumejo angleščine. Ker je bil članek strojno preveden, so lahko v njem jezikovne, slovnične in pravopisne napake.

Razširite svoja znanja
Oglejte si izobraževanje
Prvi dobite nove funkcije
Pridružite se programu Office Insider

Vam je bila informacija v pomoč?

Zahvaljujemo se vam za povratne informacije.

Zahvaljujemo se vam za povratne informacije. Videti je, da bi vam prišla prav pomoč enega od naših Officeovih agentov za podporo.

×