I am going nuts..
After I enterd the Code below, everything worked OK.
But after I restarted my DB I get the error message from Access (Dont like the System error Messages) but not like in the Code a VB Message.
Private Sub btnpos_Click()
If searchpos.Value = "" Then
MsgBox ("Please enter a Pos#")
Me.Recordset.FindFirst "POS = " & searchpos.Value
Anybody an Idear whats wrong???
Or am I just to stupid....