Private Sub ODEMETUTARI_Exit(Cancel As Integer)
If MsgBox("İşlem kaydedilsin mi?", vbInformation + vbYesNo) = vbYes Then
If IsNull(Me.ODEMETUTARI) Or Me.ODEMETUTARI = "" Or Me.ODEMETUTARI = 0 Then
MsgBox " Dikkat...Tutar Yazmadan kayıt edemezsiniz...!"
Me.ODEMETARIHI.SetFocus
Me.ODEMETUTARI.SetFocus
'Exit Sub
Else
End If
Else
End If
End Sub
Şarta bağlı Kaydetme
Bu Konudaki Yorumlar |
Şarta bağlı Kaydetme - Yazar: fascioğlu - 31/12/2015, 02:40
Cvp: Şarta bağlı Kaydetme - Yazar: C*e*l*o*y*c*e - 31/12/2015, 03:16
Cvp: Şarta bağlı Kaydetme - Yazar: fascioğlu - 31/12/2015, 03:29
Cvp: Şarta bağlı Kaydetme - Yazar: ozanakkaya - 31/12/2015, 05:53
Cvp: Şarta bağlı Kaydetme - Yazar: fascioğlu - 31/12/2015, 10:24
|
Konuyu Okuyanlar: 1 Ziyaretçi