Logi sisse Microsofti kontoga
Logige sisse või looge konto.
Tere!
Select a different account.
Teil on mitu kontot
Valige konto, millega soovite sisse logida.

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“.

Annab tulemiks pika väärtuse, mis määrab avatud failis praeguse lugemis-ja Write paigutuse.

Süntaks

Loc ( filenumber )

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

Kommentaarid

Järgmises artiklis kirjeldatakse iga Accessi režiimi tagastatavat väärtust.

Režiim

Tagastusväärtus

Juhuslik

Viimasest toimikust loetud või sellele kirjutatud kirje number.

Järjestikuse

Failis praegune baitide paigutus, jagatuna 128. Siiski ei kasutata ega vaja andmeid, mida Loc on järjestikuste failide eest tagastatud.

Binaarväärtus

Viimase baitide paigutus, mis on loetud või kirjutatud.


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-või Write positsioon. 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; MyLocation
Loop
Close #1 ' Close file.

Kas vajate veel abi?

Täiendage oma oskusi
Tutvuge koolitusmaterjalidega

Kas sellest teabest oli abi?

Kui rahul te keelekvaliteediga olete?
Mis mõjutas teie hinnangut?

Täname tagasiside eest!

×