Filter data by criteria using text box

[Dachbo]

I would like to filter my data with a text box. I want to find entries which have some numbers in common. So I want to type in something (let's say three numbers) in the text box and I want to find all records which have these three numbers in a specific column in common.



I have this code but I don't know how to use something like a wild card to filter and show the results in a list box

Dim int_WC As Integer

Me.txt_WC = int_WC

Me.lstbx_WC.RowSource = "SELECT WBS_element, Work_Ctr FROM Table1 WHERE " & Work_Ctr = "*int_WC" & ""

The column I want to filter is Work_Ctr

[ranman256]

if you FILTER data, this means your form already shows a continuous form (or single) of data
also, wildcards use LIKE not equal sign...
when you click the filter button,

me.filter = "[Work_Ctr] like '*" & int_WC  & "*'"
me.filter0n = true

[Dachbo]

how can I display the results in a listbox or subform?
and the filter is not working on the table, do I have to set it as the current database?