Kod:
Private Sub Kubt_Exit(Cancel As Integer)
Metin51.Value = DLookup("Last(Kubt)", "[KalipGenelBilgiFormu]")
If Me.Kubt.Value < Metin51.Value Then
MsgBox ("Uyarı Mesajı")
Me.Kubt = ""
End If
End Sub
Private Sub Kubt_Exit(Cancel As Integer)
Metin51.Value = DLookup("Last(Kubt)", "[KalipGenelBilgiFormu]")
If Me.Kubt.Value < Metin51.Value Then
MsgBox ("Uyarı Mesajı")
Me.Kubt = ""
End If
End Sub
Bu Konudaki Yorumlar |
2. tarihin 1. tarihden büyük olma şartı - Yazar: sinan55 - 27/02/2009, 11:40
Cvp: 2. tarihin 1. tarihden büyük olma şartı - Yazar: tdsharun - 27/02/2009, 13:09
Cvp: 2. tarihin 1. tarihden büyük olma şartı - Yazar: sinan55 - 27/02/2009, 14:19
Cvp: 2. tarihin 1. tarihden büyük olma şartı - Yazar: ozanakkaya - 27/02/2009, 14:53
Cvp: 2. tarihin 1. tarihden büyük olma şartı - Yazar: tdsharun - 27/02/2009, 15:12
Cvp: 2. tarihin 1. tarihden büyük olma şartı - Yazar: sinan55 - 27/02/2009, 15:19
Cvp: 2. tarihin 1. tarihden büyük olma şartı - Yazar: C*e*l*o*y*c*e - 27/02/2009, 19:15
Cvp: 2. tarihin 1. tarihden büyük olma şartı - Yazar: sinan55 - 28/02/2009, 09:31
|