Menampilkan Gambar Pada VB

Menampilkan Gambar Pada VB

1.      Buka program Microsoft Visual Studio 2010.

Dengan tampilan seperti berikut :

2.      Klik file – new – project

3.      Lalu ketik nama project dan pilih lokasi untuk penyimpanan file dan OK

4.      Saat klik Ok akan keluar tampilan form

5.      Disign form anda sesuai keingginan, pilih toolbox yang terdapat pada menu view, lalu pilih Picturebox, CheckBox dan Button.

6.      Klik double klik pada checkbox dan botton dengan linsting program :

Catatan : “sebelum nya masukkan gambar dalam folder debug didalam folder project, jika tidak memasukkan gambar pada debug maka saaat linsting program tidak menggunakan “Application.StartupPath &” dan saat menulis nama image sesuaikan dengan nama image yang disimpan di folder debug”

Berikut adalah syntac program menampilkan gambar di Visual Basic Studio 2010:

Linsting Program :

Public Class Latihan_project_form1_dan_form2

    Dim SW As Boolean = True

    Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged

        PictureBox1.Image = Nothing

        If CheckBox1.Checked = True Then

            PictureBox1.Image = Image.FromFile(Application.StartupPath & "\1.jpg")

            PictureBox2.Image = Image.FromFile(Application.StartupPath & "\2.jpg")

        End If

    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        End

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        If SW = True Then

            PictureBox3.Image = Image.FromFile(Application.StartupPath & "\3.jpg")

            PictureBox2.Image = Image.FromFile(Application.StartupPath & "\2.jpg")

            Button1.Text = "Gambar Disembunyikan"

            SW = False

        Else

            Button1.Text = "Gambar Ditampilkan"

            PictureBox2.Image = Nothing

            PictureBox3.Image = Nothing

            SW = True

        End If

    End Sub

End Class

7.      Lalu save and start debugging

8.      Klik di Menampilkan Gambar dan gambar ditampilkan.

Hasil outputnya adalah sebagai berikut :

9.      Pada saat klik Gambar Ditampilkan :

Hasil outputnya adalah sebagai berikut :

10.      Dan pada saat menghilangkan check dan klik button pada menampilkan gambar :

Outpunya sebagai berikut :

2.      Sekian cara menampilkan dan menyembunyikan gamabar dengan penggunakan checkbox dan button di Visual Basic Studio 2010.