Applies ToAccess pre Microsoft 365 Access 2021 Access 2019 Access 2016

Poznámka: Funkcia, metóda, objekt alebo vlastnosť, ktoré sú popísané v tejto téme, sú vypnuté, ak je služba Microsoft Jet Expression Service spustená v režime karantény, ktorý zabraňuje vo vyhodnocovaní možných nebezpečných výrazov. Ďalšie informácie o režime karantény nájdete vyhľadaním výrazu „režim karantény“ v Pomocníkovi.

Vráti hodnotu typu Long určujúcu aktuálnu pozíciu na čítanie a zapisovanie v otvorenom súbore.

Syntax

Loc( číslo súboru )

Požadovanéargumentje ľubovoľné platné celé číslo číslo súboru.

Poznámky:

Nasledujúca téma popisuje vrátenú hodnotu pre každý režim prístupu k súboru:

Režim

Vrátená hodnota

Náhodné

Číslo posledného záznamu prečítaného alebo zapísaného do súboru.

Sekvenčné

Aktuálna pozícia bajtu v súbore vydelená číslom 128. Informácie vrátené funkciou Loc pre sekvenčné súbory sa však nepoužívajú ani nevyžadujú.

Binárne

Umiestnenie posledného bajtu prečítaného alebo napísaného.

Príklad

Poznámka: Nasledujúce príklady ukazujú použitie tejto funkcie v module jazyka Visual Basic for Applications (VBA). Ak chcete získať ďalšie informácie o práci s jazykom VBA, vyberte z rozbaľovacieho zoznamu vedľa položky Hľadať možnosť Odkaz pre vývojára a do vyhľadávacieho poľa zadajte nejaké výrazy.

V tomto príklade je funkcia Loc použitá na vrátenie aktuálnej pozície na čítanie a zapisovanie v otvorenom súbore. V tomto príklade sa predpokladá, že TESTFILE je textový súbor s niekoľkými riadkami vzorových údajov.

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.

Potrebujete ďalšiu pomoc?

Chcete ďalšie možnosti?

Môžete preskúmať výhody predplatného, prehľadávať školiace kurzy, naučiť sa zabezpečiť svoje zariadenie a ešte oveľa viac.

Komunity pomôžu s kladením otázok a odpovedaním na ne, s poskytovaním pripomienok a so získavaním informácií od odborníkov s bohatými znalosťami.