Loc-funktio

Tärkeää: Tämä on artikkeli on käännetty koneellisesti. Lue vastuuvapauslauseke. Tämän artikkelin englanninkielinen versio on täällä .

Huomautus: Tässä ohjeaiheessa kuvattu funktio, menetelmä, objekti tai ominaisuus ei ole käytössä, jos Microsoft Jet Expression Service toimii eristetyssä tilassa, mikä estää mahdollisesti vahingollisten lausekkeiden arvioimisen. Katso lisätietoja eristetystä tilasta ohjeen ”Eristetty tila” -kohdasta.

Palauttaa Long, joka määrittää nykyisen luku-/ kirjoitusoikeudet sijainnin, Avaa tiedosto uudelleen.

Syntaksi

Loc ( tiedostonumero )

Pakollinen tiedostonumeroargumentti on mikä tahansa kelvollinen kokonaisluku tiedoston numero.

Huomautuksia

Seuraavassa kuvataan kunkin tiedoston käyttötilan palautusarvo:

Tila

Palautusarvo

Satunnainen

Viimeinen tietue lukeminen tai tiedostoon kirjoitettu määrä.

Peräkkäiset

Nykyinen tavu sijainnin tiedostossa jaettuna 128. Kuitenkin Loc peräkkäisiä tiedostojen palauttamia tietoja on käytetty eikä pakollinen.

Binaarinen

Viimeksi luetun tai muokatun tavun sijainti.


Esimerkki

Huomautus: Seuraavissa esimerkeissä kerrotaan, kuinka tätä funktiota käytetään Visual Basic for Applications (VBA) -moduulissa. Jos haluat lisätietoja VBA:n käytöstä, valitse Sovelluskehittäjän opasHaku-kentän viereisestä luettelosta ja anna yksi tai useampi hakuehto hakukenttään.

Tässä esimerkissä Loc -funktio palauttaa nykyisen luku-/ kirjoitusoikeudet sijainnin, Avaa tiedosto uudelleen. Tässä esimerkissä oletetaan, että TESTFILE on tekstitiedosto, jossa on muutama rivi mallitietoja.

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.

Huomautus: Konekäännöksestä ilmoittava vastuusvapauslauseke: Tämä artikkeli on käännetty tietokonejärjestelmällä, eikä kieliasiantuntija ole muokannut sitä. Microsoft tarjoaa nämä konekäännökset avuksi muille kuin englantia puhuville käyttäjille, jotta he saavat lisätietoja Microsoftin tuotteista, palveluista ja tekniikoista. Koska artikkeli on koneellisesti käännetty, se saattaa sisältää sanasto-, lauseoppi- ja kielioppivirheitä.

Kehitä taitojasi
Tutustu koulutusmateriaaliin
Saat uudet ominaisuudet ensimmäisten joukossa
Liity Office Insider -käyttäjiin

Oliko näistä tiedoista hyötyä?

Kiitos palautteesta!

Kiitos palautteestasi! Näyttää siltä, että Office-tukiedustajamme avusta voi olla sinulle hyötyä.

×