Program Vb.Net : Membuat Browse Image

Kali ini saya akan share cara melakukan browse image di vb.net dengan Windows.Forms.OpenFileDialog. Aplikasi bisa di download di sini http://www.ziddu.com/download/12793581/OpenImage.zip.html

Aplikasi yang akan kita buat seperti ini:



Pertama buat form seperti gambar di bawah ini, gunakan picturebox dan button:



Atur properties:
PictureBox1
Name : PictureBox
BorderStyle : Fixed3D

Button
Name : BtnBrowse
Text : Browse


Untuk Coding klik di btnbrowse:
Private Sub BtnBrowse_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnBrowse.Click
Dim bukaGambar As New Windows.Forms.OpenFileDialog
bukaGambar.Filter = "File Gambar(*.bmp; *.jpg;*.GIF)|*.BMP;*.JPG;*.GIF|All files(*.*)|*.*"
'tampilkan file yang berformat .jpg .bmp .gif
If bukaGambar.ShowDialog = Windows.Forms.DialogResult.OK Then
Me.PictureBox.Image = Image.FromFile(bukaGambar.FileName)
PictureBox.SizeMode = PictureBoxSizeMode.StretchImage
'biar tampilan image pas dengan kotak image yang di sediakan
Else
MsgBox("Pilih Gambar Dulu", MsgBoxStyle.Exclamation, "Error")
End If
End Sub


Aplikasi selengkapnya bisa di download di sini http://www.ziddu.com/download/12793581/OpenImage.zip.html

Labels: