Oopps, I did not get the option to attach my screen shots...

I cant see your code so hard to tell you exactly.  Basically you need something like this:


      If IsNull(YourSearchField) Or Forms!YourSearchField = 0 Then
         MsgBox " No Records found with given search parameter. "
      Exit Sub


I just realized you're still in the Beginner Lessons and you may not have the VBA knowledge you need yet.

Take a look at the Search Form 2.0  video.

If you really want to know more, check out the Search Seminar for the most comprehensive coverage of searching.

This is how I would handle this problem.

Dim mySearch As String, myRoadName As String

mySearch = InputBox("Please enter all or part of the road name", "Search For Road Name")
If mySearch = "" Then Exit Sub

myRoadName = Nz(DLookup("RoadName", "MapT", "RoadName LIKE ""*" & mySearch & "*"""),"")
If myRoadName = "" Then
    MsgBox "The road name you entered could not be found.", vbInformation, "Record Not Found"
    Exit Sub
End If

Obviously it may need some slight modification to suit your exact needs.

Thank you for your help gentlemen. I watched the Search 2.0 video but I'm still a bit confused. I got the MsgBox working if the user enters a "null" search value HOWEVER I want to also send the same msg back when a valid search value is entered that is NOT in my database. (Please see the code attached.) I tried another "If" statement after the "Me.FilterOn = True" command but I get a "Type Mismatch" runtime error.  Any thoughts ??

Thread continued here: POST