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