Soru combobox change

[Cengizhantr06]

nerde hata yapıyom İŞBANK PUAN puan deyince değişmiyor

Private Sub ComboBox3_Change()
If ComboBox3.Value = "İŞBANK" Then
TextBox70.Value = "47268024"
End If
If ComboBox3.Value = "İŞBANK İMECE KART" Then
TextBox70.Value = "47268024"
End If
If ComboBox3.Value = "İŞBANK PUAN" Then
TextBox70.Value = "47268024"
End If
If ComboBox3.Value = "HALKBANK" Then
TextBox70.Value = "1231012"
End If
If ComboBox3.Value = "HALKBANK PUAN" Then
TextBox70.Value = "1231012"
End If
If ComboBox3.Value = "DENİZBANK" Then
TextBox70.Value = "280500000356112"
End If
If ComboBox3.Value = "DENİZBANK ÜRETİCİ KART" Then
TextBox70.Value = "280500000356112"
End If
If ComboBox3.Value = "ZİRAAT KART" Then
TextBox70.Value = "295218"
End If
If ComboBox3.Value = "ZİRAAT BAŞAK KART" Then
TextBox70.Value = "295218"
End If
End Sub

 

[Seyit Tiken]

Görselde ki sonuçlar aynı, buraya bir bakın.

 

[Cengizhantr06]

Görselde ki sonuçlar aynı, buraya bir bakın.
Ekli dosyayı görüntüle 224463

Seyit bey iş bankalarının hepsinin no aynı olacak ora doğru yani iş Bankası puan ve iş Bankası imece kart no lar aynı olacak

 

[Cengizhantr06]

Görselde ki sonuçlar aynı, buraya bir bakın.
Ekli dosyayı görüntüle 224463

Orası doğru öyle olması gerek ikiside aynı olacak

 

[Seyit Tiken]

Change olayından başka tetiklemeyi deneyiniz, Change hataların oluşmasına müsaittir.

 

[Cengizhantr06]

Change olayından başka tetiklemeyi deneyiniz, Change hataların oluşmasına müsaittir.

Tm Seyit bey deneyim teşekkür ederim