Fungsi CurDir

Mengembalikan varian string yang mewakili jalur saat ini dari drive yang ditentukan.

Ikon Peringatan

Pernyataan ini saat ini tidak bekerja sseperti yang didokumentasikan. Lihatmasalah ini untuk informasi lebih lanjut.


Sintaksis:


CurDir [(Teks As String)]

Nilai hasil:

String

Parameter:

Kata: Ekspresi string apa pun yang menentukan drive yang ada (sebagai contoh, "C" untuk partisi pertama dari hard drive pertama).

Jika drive tidak ditentukan atau jika drive string nol-panjang ( ""), CurDir kembali jalan untuk drive saat ini. LibreOffice laporan dasar kesalahan jika sintaks Deskripsi drive yang tidak benar, drive tidak ada, atau jika huruf drive yang terjadi setelah surat didefinisikan dalam konfigurasi. SYS dengan pernyataan Lastdrive.

Fungsi ini tidak bergantung huruf besar/kecil.

Kode kesalahan:

5 Tidak sah dalam pemanggilan prosedur

68 Perangkat tidak tersedia

7 Kehabisan memori

51 Kesalahan internal

Contoh:


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

Mohon dukung kami!