0 Cara menampilkan gambar menggunakan Visual basic 6.0

 

 

 

Tulis syntax ini di bagian view code,

Private Sub CommandImg _Click()

        Me.cmdialog.DialogTitle = "Cari Gambar"

        Me.cmdialog.Filter = "File JPEG|*.jpg"

        Me.cmdialog.ShowOpen

        Me.tempatgambar.Picture = LoadPicture(Me.cmdialog.FileName)

End Sub

Penjelasan dari syntax diatas ;

Me.cmdialog.DialogTitle = "Cari Gambar" ,perintah ini digunakan untuk memberi nama title bar di command dialog yaitu Cari Gambar.

Me.cmdialog.Filter = "File JPEG|*.jpg" , digunakan untuk menyaring data berdasarkan ekstentesi yang digunakan. Pada perintah tersebut yang disaring adalah file yang berekstensi  .jpg.

Me.cmdialog.ShowOpen , digunakan untuk membuka jendela command dialog.

Me.tempatgambar.Picture = LoadPicture(Me.cmdialog.FileName), syntax untuk menempatkan gambar pada picture box yang bernama tempat gambar.  LoadPicture(Me.cmdialog.FileName) ,untuk me load gambar .