Filter question, Need help deciphering

[Blabolat]

I have this Filter that I use to select the frameID
It works fine, if there is a frame Id, I use a if statement to send a msgbox if the value is null or "".
This is the filter.

Private Sub qstxt_AfterUpdate()

DoCmd.SetFilter "", "[FRAMEID] Like """" & [Form]![QuickString]![qstxt] & ""*""", ""

Command154.SetFocus

However, If I put a value in that's not there, I come up with a 2498 error with this explanation.
An expression you entered is the wrong data type for one of the arguments.

I only put in numeric values.

I"m not exactly sure how I got that Filter, I probably had a macro and converted it to code.

Thanks!