Tarih doğruluğunu kontrol etmek

17/04/2009, 19:48

gogoli01

form üzerinde bulunan tarih alanına girilen tarihin doğru olup olmadığını kontrol etmek veya tarih alanını sınırlamak (örnek: 01.01.2000 'den küçük, 31.12.2029 'dan büyük tarih girememek) sadece belirtilen tarih aralığına ait değer girilmesi nasıl sağlanabilir?
17/04/2009, 21:15

Puletin

1. Tarih alanı için bunu deneyiniz

Kod:
Private Sub Tarih1_AfterUpdate()

If Me.Tarih1.Value < #1/1/2000# Then
MsgBox ("01.01.2000 den daha küçük bir tarih giremezsiniz")
Me.Tarih1.Value = ""
Else
End If

End Sub

2. Tarih alanı için bunu deneyiniz

Kod:
Private Sub Tarih2_AfterUpdate()
If Me.Tarih2.Value > #12/31/2029# Then
MsgBox ("31.12.2029 dan daha büyük bir tarih giremezsiniz")
Me.Tarih2.Value = ""
Else
End If
End Sub


Tek Bir Tarih alanından ikisinide denetlemek içinse bunu

Kod:
Private Sub Tarih_AfterUpdate()

If Me.Tarih.Value < #1/1/2000# Then
MsgBox ("01.01.2000 den daha küçük bir tarih giremezsiniz")
Me.Tarih.Value = ""
Else
If Me.Tarih.Value > #12/31/2029# Then
MsgBox ("31.12.2029 dan daha büyük bir tarih giremezsiniz")
Me.Tarih.Value = ""
Else
End If
End If
End Sub
17/04/2009, 22:47

assenucler

Teşekkürler.
17/04/2009, 22:52

accessman

tablo da alan özelliklerinden sınır koyabilirsiniz
18/04/2009, 00:06

gogoli01

yardımlarınız için teşekkür ederim. en kısa sürede deneyip sonucu sizlerle paylaşacağım.
iyi çalışmalar.
3 nolu seçenek tam da benim aradığım bir kontroldü.
yardımlarınız için tekrar teşekkür ederim.