Arkadaşlar yapmak istediğim programda combobox listesindeki herhangi bir öğenin seçildiğinde bir başka combobox daki sadece bazı öğelerin seçilebilir olmasını istiyorum.yani 2. comboboxdaki bazı öğelerin seçilebilirliğini şarta bağlamak istiyorum.bilmiyorum derdimi tam oarak anlatabildim mi .Yardımlarınızı bekliyorum.teşekkürler.
ComboBox yardım
Öncelikle Şunu Belirteyim.
ComboBoxlar tek seçimlik kutulardır. Bu Sebepledir ki
ComboBox1 içinden seçim yapıp diğer ComboBox2 den birden fazla yeri seçtirmeniz imkansızdır.
Ama şöle bir şey düşünebilirsiniz.
ComboBox1 içinden seçim yapılır, bir Listbox içine seçilen bilgiler attırılabilir.
cevap için teşekkürler ama niyetim zaten combobox da birden fazla seçeneği aynı anda seçtirmek değil.örnek vererek anlatayım başka türlü olamyacak:) otobüs firmalarının sitesinde online sefer sorgularken kalkış yeri seçildikten sonra gidilebilecek varış yerlerinin listesi çıkıyor.bu gibi
bi çözüm buldum aslında ama bu seferde kodlar uzuyor:) Teşekkürler.
Option Explicit
Private Sub Combo1_Click()
Select Case Combo1.Text
Case "İZMİR" ' izmir seçilirse
izmirTarife ' izmir tarifesini yükle
Case "ANKARA" ' ankara seçilirse
ankaraTarife ' ankara tarifesini yükle
Case "İSTANBUL" ' istanbul seçilirse
istanbulTarife ' istanbul tarifesini yükle
Case Else
'hiç biri değil se
End Select
End Sub
Private Sub Form_Load()
' combo1 içine bilgi girişi yapılıyor
Combo1.AddItem "İZMİR"
Combo1.AddItem "ANKARA"
Combo1.AddItem "İSTANBUL"
Combo1.Text = Combo1.List(0)
End Sub
Sub izmirTarife()
Combo2.Clear ' combo2 içinde önceden eklenmiş tüm veriler siliniyor
Combo2.AddItem "EŞREFPAŞA"
Combo2.AddItem "KARŞIYAKA"
Combo2.AddItem "BALÇOVA"
Combo2.AddItem "YEŞİLYURT"
Combo2.Text = Combo2.List(0) ' yükleme bittikten sonra, yüklenenler içinden ilk veri gösterilsin
End Sub
Sub istanbulTarife()
Combo2.Clear
Combo2.AddItem "TAKSİM"
Combo2.AddItem "BEŞİKTAŞ"
Combo2.Text = Combo2.List(0)
End Sub
Sub ankaraTarife()
Combo2.Clear
Combo2.AddItem "ULUS"
Combo2.AddItem "ÇANKAYA"
Combo2.Text = Combo2.List(0)
End Sub
Bu mantıkla tüm tarifeler eklenebilir, umarım yardımcı olabilmişimdir.