CurDir funktsioon

Tagastab variandistringi, mis tÀhistab mÀÀratud ketta praegust teed.

Hoiatav ikoon

This statement currently does not work as documented. See this issue for more information.


SĂŒntaks:


CurDir [(Text As String)]

TagastusvÀÀrtus:

String

Parameetrid:

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.

Veakoodid:

5 Vigane protseduuri vÀljakutse

68 Seade ei ole kÀttesaadav

7 Vaba mÀlu pole piisavalt

51 Sisemine viga

NĂ€ide:


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

Palun toeta meid!