Jika anda ingin mengetahui directory aktif saat ini anda dapat menggunakan fungsi CurDir.
Cara Penulisan fungsi CurDir adalah:
CurDir[(Drive)]
Argumen Drive bersifat optional atau boleh diabaikan.
Fungsi CurDir menghasilkan nilai string dari nama directory yang aktif.
Contoh penggunaan fungsi CurDir
Private Sub Command1_Click()
Dim strDir As String
strDir = CurDir
MsgBox "Directory aktif : " & CurDir
End Sub