Memeriksa keberadaan suatu folder di dalam komputer bisa kita lakukan dengan fasilitas search yang disediakan oleh sistem operasi Windows. Namun kita juga dapat membuat program untuk mencari folder di dalam drive.
Berikut kode untuk mencari folder "C:Folder" ada. Anda dapat mengubahnya dengan mencari nama folder pada sebuah teks boks atau kode di jalankan saat kita memencet suatu tombol. Berkreasilah!
Private Sub Form_Load()
Const ATTR_DIRECTORY = 16
If Dir$("C:Folder", ATTR_DIRECTORY) <> "" Then
MsgBox "Direktori ada!", vbInformation, "Ada"
Else
MsgBox "Direktori tidak ada!", vbCritical, "Tidak Ada"
End If
End Sub