Yes
This way

oMyForm=CreateObject("MyNewForm")

Define Class MyNewForm As MyOldForm
Desktop=[New Value]
ShowWindow=[NewValue]
EndDefine