Vade Tarihine göre göster veya gösterme.

[unalh]

S.a Arkadaşlar,


Ekli dosyada yaptığım şey vade tarihi (TextBox9) bugü (TextBox13)'ne eşit veya küçük ise CheckBox1 görünsün şayet bugünden büyük ise gözükmesin.

Ekte yaptığım kodlamada vade tarihi eşit olanlarda problen olmuyor ama küçük veya büyük olanlarda sıkıntı çıkıyır.

 

[Orion1]

Dosyanız ektedir.

Private Sub TextBox9_AfterUpdate()
TextBox9.Text = Format(TextBox9.Text, "dd.mm.yyyy")
End Sub

Private Sub TextBox9_Change()
On Error Resume Next
If CDate(TextBox9.Text) <= CDate(TextBox13.Text) Then
    CheckBox1.Visible = True
    Else
    CheckBox1.Visible = False
End If
End Sub

 

[unalh]

Evren bey çok teşekkür ederim.


Hayırlı işler.

 

[Orion1]

Evren bey çok teşekkür ederim.


Hayırlı işler.

Rica ederim.
İyi çalışmalar.