Need help in trouble shooting a "search" button

[TheScribe]

Hey all, just found this place because I am very frustrated with a Search button.



I am trying to get my database to search by Last Name. I have a field called Last Name in the table I want to search and so I have typed in the following VB code:

Private Sub Command50_Click()

If IsNull(Text48) = False Then
Me.Recordset.FindFirst "[Last Name]=" & Text48
Me!Text48 = Null
If Me.Recordset.NoMatch Then
MsgBox "No record found", vbOKOnly + vbInformation, "Sorry"
Me!Text48 = Null
End If
End If

End Sub

Command50 being the Search button and Text48 being the text box.

Anyone have ideas from this or do I need to provide more info? Thanks.

[pbaldy]

Well, for a name (any text field) it would need to be:

"[Last Name]='" & Text48 & "'"

You might try the combo box wizard, choosing the third option, "Find a record...". That same code can be adapted to your needs.

[TheScribe]

THANK YOU THANK YOU THANK YOU!!!!!! That worked perfect.

[pbaldy]

Happy to help, and welcome to the site by the way!