Функция CurDir

Функция 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 ' выводим строку в заголовке формы