Contents
Index 🔎︎

# CurDir Function

Возвращает строку типа Variant, представляющую текущий путь на указанном диске.

This statement currently does not work as documented. See this issue for more information.

## Синтаксис

    CurDir [(Текст As String)]

## Возвращаемое значение:

String

## Параметры:

Текст. Любое строковое выражение, указывающее существующий диск (например, "С" для первого раздела первого жёсткого диска).

Если диск не указан или указан строкой нулевой длины (""), CurDir возвращает путь для текущего диска. LibreOffice Basic сообщает об ошибке, если синтаксис описания диска неверен, диск не существует или буква диска находится после буквы, определенной в CONFIG.SYS инструкцией Lastdrive.

Данная функция не учитывает регистр символов.

## Error codes:

5 Неправильный вызов процедуры

68 Устройство недоступно

7 Недостаточно памяти

51 Внутренняя ошибка

## Пример:

    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