Skip to main content

AccessTr.neT


subform deger ve msgbox

orhantanriverdi
orhantanriverdi
4
1462

subform deger ve msgbox

#3
Hocam Tesekkur ederim elinize saglik, Digerleri icinde uyguladim sorunsuz calisiyor.

Sadece bir problem, Hatali tarih giriyorum ve hata cikiyor, Hataya tamam dedigimde yinede gidip hatali tarihi giriyor.

Giris yanlis ise, Mesaji aldiktan sonra tarihi hucreye eklemek yerine hucreyi bos yapabilirmi acaba. isnull gibi birsey ile


Private Sub SUB_VT_DATE_AfterUpdate()
If Me.SUB_VT_DATE < Me.VT_DATE Then
MsgBox ("KAYNAK TARIHINDEN KUCUK TARIH GIREMEZSINIZ"), vbCritical, "KUCUK DEGER UYARISI"
Exit Sub

ElseIf IsNull(Me.VT_DATE) Then
MsgBox ("KAYNAK TARIHI OLMADAN GIRIS YAPAMAZSINIZ"), vbCritical, "SUB_VT_DATE DEGERI BOS UYARISI"
Exit Sub
End If
End Sub
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
subform deger ve msgbox - Yazar: orhantanriverdi - 23/01/2017, 12:04
Cvp: subform deger ve msgbox - Yazar: atoz112 - 23/01/2017, 12:56
Cvp: subform deger ve msgbox - Yazar: orhantanriverdi - 23/01/2017, 16:01
Cvp: subform deger ve msgbox - Yazar: atoz112 - 23/01/2017, 20:02
Cvp: subform deger ve msgbox - Yazar: orhantanriverdi - 24/01/2017, 05:18
Task