ISNULL not working for some reason

  • Thread starter Thread starter Gator
  • Start date Start date
G

Gator

Why is the LostFocus event not working. Nothing happens, I am able to click
in any other control I want. I tried the Text21_Exit event and it did not
work either.

Private Sub Form_Load()
Me.Text21.SetFocus
End Sub

Private Sub Text21_LostFocus()
If IsNull(Text21) Then
MsgBox "Enter a Date on Top", vbOKOnly, Date
Cancel = True
End If
End Sub
 
Back
Top