Hi
The code is below, basically it creates an array and then runs a query on the results which populates the listbox mentioned.
Private Sub txtSearch_AfterUpdate()
'create array for search from search field (max 3 search criteria)
Dim StockString, StockArray, Msg
StockString =...