Search Combo Box

[Syla]

Hi All,



I have an access form which currently has a search text box - if you enter '2011' all orders id's from week 2011 will show in a combo box and a sub form below however it will only let you search once. You have to close and reopen the form for it to search again.

[ranman256]

the query in the subform should be filtered when user enters a value in the combo:

sub cboBox_afterupdate()
if isNull(cboBox) then
   me.subform.form.filteron = false
else
   me.subform.form.filter = "[field]='" & forms!fMasterFrm!cboBox & "'"
 
   me.subform.form.filteron = true
endif
end sub

or the query for the subform could just be swapped.
the combo would have 2 columns ; 1 with the caption, 2 with the query:

me.subform.sourceobject = "query." & cboBox.column(1)