LibreOffice 7.1 abi
Tagastab variandistringi, mis tÀhistab mÀÀratud ketta praegust teed.
CurDir [(Text As String)]
String
Text: suvaline stringavaldis, mis mÀÀrab olemasoleva ketta (nt C esimese kÔvaketta esimese partitsiooni korral).
Kui ketast pole mÀÀratud vĂ”i kui ketas on nullpikkusega string (""), siis tagastab CurDir praeguse ketta tee. Kui ketta kirjelduse sĂŒntaks on vale, ketast pole olemas vĂ”i kui ketta tĂ€ht on pĂ€rast failis CONFIG.SYS lausega Lastdrive mÀÀratud tĂ€hte, siis kuvab LibreOffice veateate.
See funktsioon ei ole tÔstutundlik.
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