You could add code to the On Exit event of the text box that displays a message and cancels the exit if the text box is null.
Private Sub txtName_Exit(Cancel As Integer)
If IsNull(Me.txtName) Then
MsgBox "You must enter a name.", vbOKOnly, "Null Name"
Cancel = True
End If
End Sub Terry L. Broadbent
FAQ183-874 contains tips for posting questions in these forums.
NOTE: Reference to the FAQ is not directed at any individual.