AccessTr.neT
Metin Kutusuna doğru bilgi ekleme. - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Metin Kutusuna doğru bilgi ekleme. (/konu-metin-kutusuna-dogru-bilgi-ekleme.html)



Metin Kutusuna doğru bilgi ekleme. - yorum70 - 18/05/2014

İyi akşamlar.

Formda ki alanlara eklemeler yaparken, İlkyanit_Tarihi hiçbir zaman zamanasiminden büyük veya 30 gün öncesi olmaması lazım, büyük ise uyarıyı verdirdim( 30 gün olayını daha kavrayamadım)

Burada mesajı veriyor ancak, ben mesajı okuyup mause ile bir alta geçin devam ediyorum, istiyorum ki, ilkyanit_tarihini, zamanasimi tarihinden 30 gün ve altı küçük yapmadan bir sonraki alana geçmesin.

Umarım anlatabilmişimdir!

ÖRNEK: Suc_Tarihi= 25,11,2009
Zamanasimi=25.11.2017
İlkyanit_Tarihi = 27.10.2017 yazılınca, uyarı verip ilkyanit_tarihini düzeltmeden bir sonraki alana geçilmemesinin zorlanması lazım.


Cvp: Metin Kutusuna doğru bilgi ekleme. - Kur@l - 18/05/2014

Denermisin Hocam.

Private Sub ilkyanit_Tarihi_BeforeUpdate(Cancel As Integer)
If Me.ilkyanit_Tarihi > Me.Zamanasimi Then
MsgBox "olmaz "
Cancel = True
End If
End Sub



Cvp: Metin Kutusuna doğru bilgi ekleme. - yorum70 - 18/05/2014

Sayın Kur@l hocam, öncelikle hoşgeldiniz.

Teşekkür ediyorum, gayet güzel olmuş, sorun çözülmüştür.

Saygılarımla.