* Call this something indicating what it is in a prg >* I'll use ActiveX.prg >DEFINE CLASS MySubClass AS OLECONTROL > * Whatever here >ENDDEFINE >SET PROCEDURE TO ActiveX.prg ADDITIVE >ThisForm.AddObject("MyObjName", "MySubClass", "ProgID")In the above "ProgID" is to be replaced with the ProgId of the control being sub-classed.