Thanks for the response...now it gives me this error.
Run-time error '3075':
Syntax error (missing operator) in query expression 'ID=Joe Customer'.
Private Sub CustomerID_NotInList(NewData As String, Response As Integer)
DoCmd.OpenForm "entercustomer", , , , , acDialog, NewData...