access vba like operator return onle first result

Question

I have a textbox to input search word. I use this code to search:

Dim strfilter As String
Strfilter = "[VendorName] like \'*" & Me.searchtxt.val