Функция CurDir

CurDir[ (Drive) ]
CurDir$[ (Drive) ]

Функция CurDir(Current Directory) определяет текущую рабочую папку

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

Функция CurDir возвращает данные подтипа String типа Variant. Функция CurDir$ возвращает данные типа String

Параметры
Drive
Необязательный аргумент. Строковое выражение, указывающее на текущую рабочую папку. Если аргумент Drive не указан или является пустой строкой(""), то функция CurDir возвращает путь к текущей рабочей папке текущего рабочего диска.
Drive задается только буквой с необязательным двоеточием после нее("C" или "C:").
Если Drive задан неправильно или не существует, генерируется ошибка стадии исполнения Device unavaible
Поскольку фунция воспринимает только однобуквенные названия дисков, использовать сетевые имена дисков нельзя

Пример

Dim retval
retval=CurDir("C")
Form1.Caption= retval ' выводим строку в заголовке формы
Категория
Функции работы с файлами