K
Ken Snell
Chances are, you don't have a Null value in the textbox but perhaps an empty
string?
Use this code (assumes that a decimal separator is a period):
If Len(Me.txtDateEnd.Value & "") = 0 Then
MsgBox "You must enter a value!"
ElseIf IsNumeric(Me.txtDateEnd.Value) = True And _
InStr(Me.txtDateEnd.Value, ".") > 0 Then
MsgBox "You must enter an integer value!"
End If
string?
Use this code (assumes that a decimal separator is a period):
If Len(Me.txtDateEnd.Value & "") = 0 Then
MsgBox "You must enter a value!"
ElseIf IsNumeric(Me.txtDateEnd.Value) = True And _
InStr(Me.txtDateEnd.Value, ".") > 0 Then
MsgBox "You must enter an integer value!"
End If