It looks like you didn't have the code to re-query implemented correctly. This is the implementation I had in mind, but not sure if its what you had in mind.
If you don't want to show all the data in the listbox, you could also use a DLookup function to check for the filters, and just have one...