Senin, 30 Maret 2015

PROGRAM "Menampilkan Gambar" dengan menggunakan Visual Basic


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.Klik toolbox yang terdapat pada pinggiran tampilan form, lalu pilih Picturebox, CheckBox dan Button.



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

Linsting Program :

Public Class form3
    Dim SW As Boolean = True
Private Sub CheckBox1_CheckedChanged(ByVal sender As System.ObjectByVal e As System.EventArgs)Handles CheckBox1.CheckedChanged
        PictureBox1.Image = Nothing
        If CheckBox1.Checked = True Then
PictureBox1.Image= Image.FromFile(Application.StartupPath& "\shaheer.jpg")
PictureBox2.Image= Image.FromFile(Application.StartupPath& "\pooja.jpg")
        End If
    End Sub

Private Sub Button2_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandlesButton2.Click
        End
    End Sub

Private Sub Button1_Click(ByVal sender As System.ObjectByVal e As System.EventArgsHandlesButton1.Click
        If SW = True Then
PictureBox3.Image= Image.FromFile(Application.StartupPath & "\shaher.jpg")
PictureBox2.Image= Image.FromFile(Application.StartupPath& "\pooja.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.
Pada saat klik Menampilkan Gambar :


9. Pada saat klik Gambar Ditampilkan :


10.  Pada saat klik Gambar Disembunyikan :


11.  Dan pada saat menghilangkan check pada menampilkan gambar :


12. Selesai



Tidak ada komentar:

Posting Komentar