If Me.tarih < DMax("[tarih]", "Tablo2") Then
MsgBox ("küçük tarih")
End If
Tarih metin kutusunun güncelleştirme sonrasında olayına aşağıdaki kodu yazarsan uyarı verir, koşullu biçimlendirme olayı içinh yeni konu açınız.