Membuat Explorer

Hmm... udah lama nggak posting nieh^^

Kali ini kita akan membuat aplikasi bernama "explorer". Sebenarnya aplikasi ini untuk menjelaskan bagaimana menyelaraskan drivelistbox, dirlistbox dan filelistbox. Kenapa aplikasi ini perlu gw posting karena pada jaman dulu kala gw kesulitan banget buat meng-konek-an ketiga toolbox tersebut,

*Langkah pertama seperti biasa buka Microsoft Visual Basic dan pilih new project
*Langkah kedua, pada toolbox klik drivelistbox, dirlistbox dan filelistbox kemudian atur posisi ketiganya seperti gambar di bawah ini

   Untuk propertinya standar saja (nggak usah diubah)

*Langkah ketiga masukkan source code dibawah ini

Private Sub Dir1_Change()
File1.Path = Dir1.Path
File1.FileName = "*.*" 'edit ini misal "*.doc"
End Sub
Private Sub Drive1_Change()
Dir1 = Drive1
End Sub
Private Sub Form_Load()
'saat form di load maka akan menjalankan perintah di bawah ini
Dir1 = Drive1
File1.Path = Dir1.Path
File1.FileName = "*.*"
End Sub
Langkah terakhir jalankan program dengan menekan tombol F5, lalu compile menjadi *.exe
Ternyata mudah ya…. tapi kenapa koq dulu gw nggak bisa xixixi
Dapattkan source kodenya Download disini