Funktsioon Loc

Märkus. : Selles teemas kirjeldatud funktsioon, meetod, objekt või atribuut keelatakse, kui teenus Microsoft Jet Expression Service töötab "liivakastirežiimis", mis takistab potentsiaalselt ohtlike avaldiste hindamist. Lisateavet "liivakastirežiimi" kohta leiate spikrist (märksõnaga "sandbox mode").

Tagastab andmetüübi pikk andmetüüp, mis määratleb avatud failis praeguse lugemis-/kirjutamiskoha.

Süntaks

Loc(failinumber)

Nõutav argumentfailinumber on suvaline andmetüüp Täisarv, mis on failinumber.

Kommentaarid

Järgnevalt kirjeldatakse tagastatavaid väärtusi erinevate pöördusrežiimide korral.

Režiim

Tagastatav väärtus

Suvapöördus

Viimati failist loetud või sinna kirjutatud kirje number.

Jadapöördus

Praegune baidi asukoht failis, kui fail on jagatud 128-ga. Teavet, mille funktsioon Loc tagastab jadafaili kohta, ei kasutata või ei nõuta.

Kahendpöördus

Viimati loetud või kirjutatud baidi asukoht.


Näited

Märkus. : Järgnevad näited on selle kohta, kuidas seda funktsiooni rakenduse Visual Basic for Applications (VBA) moodulis kasutada. Lisateavet VBA-ga töötamise kohta leiate, kui valite käsu Otsi kõrval olevast ripploendist valiku Arendaja viide ning sisestate otsinguväljale ühe või mitu sõna.

Järgmises näites tagastatakse funktsiooni Loc abil praegune lugemis-/kirjutamiskoht avatud failis. Selles näites eeldatakse, et fail TESTFILE on mõnerealine näiteandmetega 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.
Täiendage oma oskusi
Tutvuge koolitusmaterjalidega
Kasutage uusi funktsioone enne teisi
Liituge Office Insideri programmiga

Kas sellest teabest oli abi?

Täname tagasiside eest!

Täname tagasiside eest! Tundub, et võiksime teid kokku viia ühega meie Office'i tugiagentidest, kes aitab teil probleemi lahendada.

×