Need to Filter Query with textbox

[jmshipe]

Okay, so I know this sounds easy, but for some reason I'm having alot of trouble working this out. I've looked for the answer on other posts, but nothing has worked.

I have a form with a text box ("txtbox1"). When this number is updated with the update function I want it to filter a query WHERE [Field] = "txtbox1" value.

The query is displayed in a subform. It draws its information from one table.

My code is a mess right now so I won't post it. I can answer any questions though.

Thank You

[twinnyfo]

Proper syntax should be:

"SELECT * FROM tblTableName WHERE [Field] = '" & Me.txtbox1 & "';"
 

If you are just filtering the subform, you can filter the subform directly fromthe main form:

Me.fsubFormName.Form.Filter = "[Field] = '" & Me.txtbox1 & "'"
Me.fsubFormName.Form.FilterOn = True
 

I think this is the direction you want to go?

[jmshipe]

Okay well I'm getting a "Data type mismatch in criteria expression"

I tried putting the textbox name and value variable name.

'Variable for aRxNumber textbox
Dim rxNum As Long
rxNum = Val(Nz([Form_Log Form].aRxNumber.Value, 0))

Me.rxQuery.Form.Filter = "[Rx Number] = '" & rxNum & "'"
Me.rxQuery.Form.FilterOn = True

[twinnyfo]

It was unclear as to whether this field was a text or a number. It appears to be a number. Try removing the single quote in the expression, like so:

Me.rxQuery.Form.Filter = "[Rx Number] = " & rxNum
 

Also, as a gentle reminder, please use the code tags when posting your code.

Hope this helps, my friend.....

[jmshipe]

It worked! Thank you again for the help and guidance.