Selasa, 07 April 2015

PROGRAM MENAMPILKAN GAMBAR

Pada Program menampilkan gambar ini menggunakan Toolbox "ComboBox"



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, GroupBox, Label,  ComboBox, RadioButton dan Button. Dan design akan berubah sepeti ini.


6.Klik double klik pada Formnya dengan linsting program :

Linsting Program :


Public Class Form4

    Private Sub RadioButton1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged
        If RadioButton1.Checked = True Then
            If ComboBox1.Text = "Dewasa" Then
                PictureBox1.Image = Image.FromFile(Application.StartupPath & "\om.jpg")
            ElseIf ComboBox1.Text = "Orang Tua" Then
                PictureBox1.Image = Image.FromFile(Application.StartupPath & "\11.jpg")
            Else
                PictureBox1.Image = Image.FromFile(Application.StartupPath & "\ibal.jpg")
                End If
            End If
    End Sub
    Private Sub RadioButton2_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles RadioButton1.CheckedChanged
        If RadioButton2.Checked = True Then
            If ComboBox1.Text = "Anak-anak" Then
                PictureBox1.Image = Image.FromFile(Application.StartupPath & "\zahraa.jpg")
            ElseIf ComboBox1.Text = "Orang Tua" Then
                PictureBox1.Image = Image.FromFile(Application.StartupPath & "\12.jpg")
            Else
                PictureBox1.Image = Image.FromFile(Application.StartupPath & "\kemal.jpg")
            End If
        End If
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If sender.tag = 1 Then
            PictureBox1.Image = Nothing
            ComboBox1.Text = ""
            RadioButton1.Checked = False
            RadioButton2.Checked = False
        Else
            PictureBox1.Image = Nothing
            ComboBox1.Text = ""
            RadioButton1.Checked = False
            RadioButton2.Checked = False

        End If
    End Sub
End Class

7. Lalu save and start debugging, Setelah debugging
8. Pada label Orang, ada 3 pilihan Dewasa, Anak-anak, dan Orang Tua, Pilih salah satunya dan diklik. Begitu juga dengan label Jenis, klik salah satunya yang ingin kamu lihat.
Maka akan tertampil gambar seperti ini.



Begitu juga dengan yang lain, apa yang kamu ingin lihat dipilihan yang ada.
akan tertampil gambar yang sesuai dengan masukkan.

9. Selesai



Selemat mencoba bagi pembaca blog saya :)

Maaf bila kurang memuaskan......





Tidak ada komentar:

Posting Komentar