Combobox ile picturebox kullanımı

Bu dersimizde combobox ile picturebox kullanımı öğrenelim..



pictureboxların visible olayını false yapıyoruz!!

Bu dersimizde combobox ile picturebox kullanımı öğrenelim..


Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

        If ComboBox1.Text = "laleler" Then

            PictureBox4.Visible = True

            PictureBox1.Visible = False

            PictureBox2.Visible = False

            PictureBox3.Visible = False

        End If

        If ComboBox1.Text = "koala" Then

            PictureBox2.Visible = True

            PictureBox1.Visible = False

            PictureBox4.Visible = False

            PictureBox3.Visible = False

        End If

        If ComboBox1.Text = "penguenler" Then

            PictureBox3.Visible = True

            PictureBox1.Visible = False

            PictureBox2.Visible = False

            PictureBox4.Visible = False

        End If

        If ComboBox1.Text = "deniz anası" Then

            PictureBox1.Visible = True

            PictureBox4.Visible = False

            PictureBox2.Visible = False

            PictureBox3.Visible = False

        End If

      

    End Sub



  • Etiketler;
Yusuf Göksu Coşkun
Lefke Avrupa Üniversitesi - Bilgisayar Mühendisliği
Yorum Yaz

Yorum yazabilmek için üye girişi yapmanız gerekiyor!

dediğinizi yaptım ama bende birşey çıkmadı
Private Sub ComboBox1_SelectedIndexChanged...'den sonra [code] PictureBox1.Visible = False PictureBox2.Visible = False PictureBox3.Visible = False PictureBox4.Visible = False [/code] ... daha sonra select case'den istediğin resmi true yapabilirsn (fazladan kod yazmaya gerek yok :) ) Tam kod : [code] Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged PictureBox1.Visible = False PictureBox2.Visible = False PictureBox3.Visible = False PictureBox4.Visible = False Select Case ComboBox1.Text Case "laleler" : PictureBox1.Visible = True Case "koala" : PictureBox2.Visible = True '... buraya devamı gelecek End Select End Sub [/code]
ya ben Case fazla bilmiyorum.ama olsun söylediğiniçin çok saul :)) Simgeulgen nasıl olmaz ya ben vb.net 2008 de yaptım oldu ..bana hatanın yerini söylersen yardımcı olabileceğimi düşünüyorum...
pictureboxların visibled olayını false yap ve ben 4 tane picurebox yerleştirdim hepsini hazır resimlerimden aldım ... bide bunları yaparak dene
örnek programını ekle de bir bakalım

Yukarı Git