Program Image Browser Dengan Menggunakan Microsoft Visual Basic 6.0

Langkah- langkah pembuatan Program Image Browser adalah sbb :

·  Buka proyek Standard EXE yang baru

·  Disain tampilan form seperti gambar berikut dengan menggunakan objek Label, TextBox, CommandButton, DriveListBox, DirListBox dan FileListBox.

 

 Gbr 1

 

Gbr 2

·   Atur Properties masing - masing kontrol seperti dibawah ini :

Kontrol	Properties	Pengaturan
TextBox	Name Text Font ForeColor	txt_FileName (dikosongkan) MS Sans Serif, Bold, 10 &H00C00000&
Label1	Caption Font ForeColor	File Name  : MS Sans Serif, Bold, 10 &H00FF0000&
CommandButton1	Name         Caption	cmd_exit E&xit

Form1

Name Caption

frm_image_browser Program Browser Gambar

·   Klik View  =>  Code lalu copy paste (copas) kode program dibawah ini :

Private Sub cmd_exit_Click()

End

End Sub

Private Sub Dir1_Change()

Me.File1.Path = Me.Dir1.Path      'memperbaharui daftar file berdasarkan nama direktori atau nama folder

End Sub

Private Sub Drive1_Change()

Me.Dir1.Path = Me.Drive1.Drive    'memperbaharui direktori atau folder ketika pemakai memilih drive

End Sub

Private Sub File1_Click()

On Error Resume Next              'program tidak error apabila file terpilih bukan sebuah gambar

Gambardipilih = Me.File1.Path & "/" & Me.File1.FileName                     'menampilkan path dan nam file gambar

Me.Image1.Picture = LoadPicture(Gambardipilih)                              'menampilkan gambar

Me.txt_FileName.Text = Me.File1.FileName                                    'menampilkan nama file pada textbox

frm_image_browser.Caption = "Browser Gambar I (" + Gambardipilih + ")"      'menampilkan path dan nama file gambar pada judul form

End Sub

·   Jalankan Program dengan cara menekan tombol F5 pada keyboard atau pilih menu Run  => Start

·   Hasilnya ketika program dijalankan :

Apabila File yang dipilih bukan merupakan file gambar, maka pada Image1 tidak ada gambar seperti terlihat pada gambar di bawah ini :

 

 Gbr3

Apabila File yang dipilih merupakan file gambar (mis : file BMP, JPG, JPEG), maka gambar file tersebut akan ditampilkan pada Image1 seperti terlihat pada gambar di bawah ini :

 

  Gbr4

Download Program Browser Gambar  disini