Forumda emeği geçen herkese merhaba. Arkadaşlar aşağıdaki kodlarda
ComboBox6 dan seçtiğim veriyi ListBox1'in 2 ve 4 cü sütunlarında aratıp TextBox1'e ListBox1 de bulunan değerin Listındex'ini yazdırmaya çalışıyorum.
Kodlarda nasıl bir hata var ki ben bu listidex değerini bulamıyorum. İlgilenen arkadaşlara şimdiden teşekkürler.
bul = ComboBox6
For i = 0 To ListBox1.ListCount - 1
If ListBox1.List(i, 2) = bul Or ListBox1.List(i, 4) = bul Then
TextBox1 = ListBox1.Column(0)
Exit Sub
End If
Next
ComboBox6 = Empty
ComboBox6 dan seçtiğim veriyi ListBox1'in 2 ve 4 cü sütunlarında aratıp TextBox1'e ListBox1 de bulunan değerin Listındex'ini yazdırmaya çalışıyorum.
Kodlarda nasıl bir hata var ki ben bu listidex değerini bulamıyorum. İlgilenen arkadaşlara şimdiden teşekkürler.
bul = ComboBox6
For i = 0 To ListBox1.ListCount - 1
If ListBox1.List(i, 2) = bul Or ListBox1.List(i, 4) = bul Then
TextBox1 = ListBox1.Column(0)
Exit Sub
End If
Next
ComboBox6 = Empty