Skip to main content

AccessTr.neT


Tarih doğruluğunu kontrol etmek

Tarih doğruluğunu kontrol etmek

Çözüldü #2
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

Kaplumbağa ya dikkat et...
Sadece  başını çıkartıp risk aldığında ilerleyebiliyor...
Son Düzenleme: 17/04/2009, 21:19, Düzenleyen: Puletin.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da

Bu Konudaki Yorumlar
Tarih doğruluğunu kontrol etmek - Yazar: gogoli01 - 17/04/2009, 19:48
Cvp: Tarih doğruluğunu kontrol etmek - Yazar: Puletin - 17/04/2009, 21:15
Task