Io ti avevo suggerito :
codice:
Private Function RetrieveIdCust(ByRef Combo As ComboBox , id As Integer ) As Integer

' Ho visto che ha cambiato nome ....... o hai veramente tutte e due le funzioni ? bho .......

Private Function DecodeIdCust(ByRef Combo As ComboBox , id As Integer ) As Integer
Utilizza ComboBox al posto di Object.
Un oggetto di tipo generico, 'object' non ha i metodi di una combo : Combo.List(...) ecc..