Ulises:

Set your CodeNumber combo box to have the following proeprties:
RowSourceType=3 (SQL Statement)
RowSource="SELECT DISTINCT CodeNumber FROM Inventory ORDER BY CodeNumber"

In the InteractiveChange event, code
SELECT Products
LOCATE ALL FOR CodeNumber=THIS.Value

and that should do the trick.

Daniel