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 Variant (String), ktorá predstavuje aktuálnu cestu.

Syntax

CurDir[(jednotka)]

Voliteľný argument jednotka argument je reťazcový výraz, ktorý určuje existujúcu jednotku. Ak nie je zadaný žiadny disk, alebo ak argument jednotka je reťazec s nulovou dĺžkou (""), funkcia CurDir vráti cestu k aktuálnej jednotke. V počítači Macintosh funkcia CurDir ignoruje akúkoľvek zadanú jednotku a jednoducho vráti cestu pre aktuálnu jednotku.

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 CurDir použitá na vrátenie aktuálnej cesty. V počítači Macintosh sa špecifikácia jednotky zadaná vo funkcii CurDir ignoruje. Predvolený názov jednotky je „HD“ a časti názvu cesty sú oddelené dvojbodkami, nie opačnými lomkami. Podobne sa zadávajú aj priečinky s názvom Macintosh namiesto \Windows.

' Assume current path on C drive is "C:\WINDOWS\SYSTEM" (on Microsoft Windows).' Assume current path on D drive is "D:\EXCEL".' Assume C is the current drive.Dim MyPathMyPath = CurDir    ' Returns "C:\WINDOWS\SYSTEM".MyPath = CurDir("C")    ' Returns "C:\WINDOWS\SYSTEM".MyPath = CurDir("D")    ' Returns "D:\EXCEL".

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.