Довідка LibreOffice 7.1
Повертає рядок типу Variant, що представляє поточний шлях на вказаному диску.
CurDir [(Текст As String)]
Рядок
Текст: будь-який рядковий вираз, що визначає існуючий диск (наприклад, "C" для першого розділу першого жорсткого диску).
Якщо диск не вказаний або вказаний рядок нульової довжини (""), то CurDir повертає шлях для поточного диску. LibreOffice Basic повідомляє про помилку, якщо синтаксис опису диска неправильний, диск не існує або буква диску знаходиться після букви, визначеної в CONFIG.SYS інструкцією Lastdrive.
Дана функція не враховує регістр символів.
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