I am using the following code to find a record on a form:
Me.txtFindString.SetFocus
If IsNull(Me.txtFindString) Then
MsgBox "Please enter a search string", vbOKOnly
Else
DoCmd.FindRecord Me.txtFindString, acAnywhere, , acSearchAll, , acAll, True
End If
and...