AccessTr.neT

Me.Ith_FaturaTar adındaki TextBox ile Me.Ith_Tarih TextBox ını büyüktür veya küçüktür karşılaştırması yapyığımda "BÜYÜKTÜR" veya " KÜÇÜKTÜR" mesajını vermesini istiyorum ama mesaj vermiyor. Fakat aynı şekilde Me.Ith_FaturaTar isimli textbox ile Me.Ith_Tarih (yani bugünkü Tarihi gösteriyor.) yerine Date yazdığımda bir değer döndürüyor ve istediğimiz MESAJI veriyor. Ben istiyorum ki textbox kutusundaki taihleri karşılaştırıp istenen mesajı versin. Bunun için nasıl bir kod yazılmalı. Şimdidenyardımcı olacak arkadaşlara teşekkürler.

Örneğin
Aşağıdaki kod yazıldığında mesaj vermiyor körsır bir sonraki denetime gidiyor:

Private Sub Ith_FaturaTar_Exit(Cancel As Integer)

If Me.Ith_FaturaTar > Me.IthTarih Then

MsgBox "FATURA TARİHİ BUGÜNKÜ TARİHDEN BÜYÜKTÜR."

Cancel = True

End If

End Sub

Aşağıdaki kodda Me.Ith_Tarih yerine Date yazdığımda Mesaj veriyor

Private Sub Ith_FaturaTar_Exit(Cancel As Integer)

If Me.Ith_FaturaTar > Date Then

MsgBox "FATURA TARİHİ BUGÜNKÜ TARİHDEN BÜYÜKTÜR."

Cancel = True

End If

End Sub

Nasıl yaptığınızı boşverip ben kendime göre basit bir if.. then örneği hazırladım. incelerseniz belki yararı olur.

---

Eğer sizde çalışmıyorsa bu durum sizin örneğinzdeki alanların tarih formatında olmasından kaynaklanıyordur. Bu durumda en güzeli örnek eklemenizdir.

If cdate(Me.Ith_FaturaTar) > cdate(Me.IthTarih) Then
gibi tarihe çevirerek kullanın.

Sayın ayhan2122 kod çalıştı yardımlarınız için çok teşekkürker