Applies ToAccess for Microsoft 365 Access 2021 Access 2019 Access 2016

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-arvon, joka määrittää nykyisen luku-/kirjoitussijainnin avoimessa tiedostossa.

Syntaksi

Loc( filenumber )

Pakollinen tiedostonumeronargumentti on mikä tahansa kelvollinen kokonaisluku tiedoston numero.

Huomautuksia

Seuraavassa kuvataan kunkin tiedoston käyttötilan palautusarvo:

Tila

Palautusarvo

Satunnainen

Tiedostosta luettavan tai tiedostoon kirjoitetun viimeisen tietueen numero.

Peräkkäinen

Tiedoston nykyinen tavukohta jaettuna 128:lla. Loc:n peräkkäisille tiedostoille palauttamia tietoja ei kuitenkaan käytetä eikä vaadita.

Binaarinen

Viimeisen tavun sijainti luettuna tai kirjoitettuna.

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-funktion avulla palautetaan nykyinen luku-/kirjoitussijainti avoimessa tiedostossa. 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; MyLocationLoopClose #1    ' Close file.

Tarvitsetko lisäohjeita?

Haluatko lisää vaihtoehtoja?

Tutustu tilausetuihin, selaa harjoituskursseja, opi suojaamaan laitteesi ja paljon muuta.

Osallistumalla yhteisöihin voit kysyä kysymyksiä ja vastata niihin, antaa palautetta sekä kuulla lisää asiantuntijoilta, joilla on runsaasti tietoa.