LibreOffice 7.1:n ohje
CurDir palauttaa variant-tyyppisen merkkijonon, joka esittää määritetyn levyaseman nykyistä polkua.
CurDir [(teksti1 As String)]
merkkijono (String)
Teksti1: merkkijonolauseke, joka määrittää olemassa olevan levyaseman (esimerkiksi "C" ensimmäisen kovalevyn ensimmäiselle levyosiolle).
Jos yhtään levyasemaa ei määritetä tai jos levytunnus on nolla-pituinen merkkijono (""), CurDir palauttaa nykyisen levyaseman polun. LibreOffice Basic antaa virheilmoituksen, jos levyasematunnus on sopimaton, jos asemaa ei ole olemassa tai jos levyaseman kirjain on CONFIG.SYS Lastdrive-lauseen määrittämän rajan jälkeinen kirjain.
Tämä funktio ei erottele suur- ja pienaakkosia.
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