DriveLisBox, DirListBox, dan FileListBox PADA VB 6.0

DriverLisbox adalah sebuah control yang digunakan untuk menampilkan drive yan ada dalam computer, sedangkan DirListBox adalah control yang digunakan untuk menampilkan direktori yang ada didalam drive yang sedang dipilih. Jika anda ingin menampilkan file –file yang ada didalam direktori atau drive yang sedang aktif, Gunakan kontrol FileListBox. Langkah – langkah SBB..

1. Buat Proyek baru , kemudian di dalam form tambahkan control DriveListBox, DirListBox, FileListBox, dan Image ( control untuk menampilkan Gambar ). Atur letak control pada form seperti gambar berikut :

 

2.   Ubah Properti  melalui property window dengan ketentuan sebagai berikut :

Nama Kontrol	Properti	Setting
FileListBox	Pattern	*.bmp;*.jpg;*.gif.

3.   Klik ganda control DriveListBox, ketikkan perintah :

Private Sub Drive1_Change() Dir1.Path = Drive1.Drive End Sub

4. Klik ganda control DirListBox, Ketikkan perintah :

Private Sub Dir1_Change() File1.Path = Dir1.Path End Sub

5.  Klik ganda control FileListBox, ketikkan perintah :

Private Sub File1_Click() 'memanggil file gambar untuk ditampilkan pada kontrol image1 Image1.Picture = LoadPicture(File1.Path & "\" & File1.FileName) End Sub

6.   Jalankan program dengan menekan F5. Untuk mengoperasikannya, gunakan cara berikut

·      Pada bagian DriveListBox, tentukan lokasi di mana file gambar tersebut anda simpan, apakah di drive C,D atau E.

·      Pada bagian DirListBox, Klik ganda nama folderyang menampung file gambar

·      Dari beberapa file gambar yang tampil pada control FileListBox, Klik salah satu dari file gambar yang diinginkan dan perhatikan hasilnya pada pada control image.

 

 

7. Simpan aplikasi dengan nama file form : LATIHAN 5, dan nama file proyek: LATIHAN5.vbp