Vsebina
Kazalo 🔎︎

# Funkcija CurDir

Vrne niz vrste Variant, ki vsebuje trenutno pot na imenovanem pogonu.

Ta ukaz trenutno ne deluje tako, kot je dokumentirano. Oglejte si to zadevo (v angl.) za več informacij.

## Skladnja:

    CurDir [(Besedilo As String)]

## Vrnjena vrednost:

String

## Parametri:

Besedilo: poljuben niz ali izraz, ki definira obstoječ pogon (npr. »C« za prvi razdelek na prvem trdem disku).

Če pogona ne navedete ali pa je spremenljivka prazna (""), bo CurDir vrnil pot trenutnega pogona. LibreOffice Basic bo javil napako, če skladnja za opis pogona ni pravilna, če pogon ne obstaja ali pa če je črka pogona večja od črke, ki je v CONFIG.SYS navedena v ukazu Lastdrive.

Ta funkcija ne razlikuje med velikimi in malimi črkami.

### Kode napak:

5 Neveljaven klic procedure

68 Naprava ni na voljo

7 Premalo pomnilnika

51 Notranja napaka

## Primer:

    Sub ExampleCurDir
    Dim sDir1 As String , sDir2 As String
        sDir1 = "c:\Test"
        sDir2 = "d:\Private"
        ChDir( sDir1 )
        MsgBox CurDir
        ChDir( sDir2 )
        MsgBox CurDir
    End Sub