Şarta Bağlı Ceheckboxların Seçili Olması

[ahmed_ummu]

Günaydın arkadaşlar.

Bir konuda yardımlarınızı rica edeceğim.

Textbox13 deki tarih 15.10.2008' e eşit veya küçük ise checkbox1 seçili olsun. Textbox13 deki tarih 15.10.2008 den büyük ise checkbox2 seçili olsun istiyorum. Aşağıdaki kodlar ile denedim ama bazı karışık bişey yapıyor. bazen küçük ise ceheckbox2 yi bazen de checkbox1 i seçili yapıyor. Yardımcı olursanız sevinirim.

If TextBox13.Value <= "15.10.2008" Then
CheckBox1.Value = True
CheckBox2.Value = False
Else
CheckBox1.Value = False
CheckBox2.Value = True
End If

 

[AdemCan]

Merhaba, örnek kodlar.

Private Sub TextBox13_Exit(ByVal Cancel As MSForms.ReturnBoolean)

    If TextBox13.Value <= CDate("15.10.2008") Then
        CheckBox1.Value = True
        CheckBox2.Value = False
    Else
        CheckBox1.Value = False
        CheckBox2.Value = True
    End If

End Sub

 

[ahmed_ummu]

Merhaba, örnek kodlar.

Private Sub TextBox13_Exit(ByVal Cancel As MSForms.ReturnBoolean)

    If TextBox13.Value <= CDate("15.10.2008") Then
        CheckBox1.Value = True
        CheckBox2.Value = False
    Else
        CheckBox1.Value = False
        CheckBox2.Value = True
    End If

End Sub

Teşekkürler AdemCan bey düzeldi.

 

[AdemCan]

Rica ederim.