>CREATE CLASSLIB Junk
>CREATE CLASS MyTextBox OF Junk.VCX AS _Textbox From _Base.VCX
>MODIFY CLASS MyTextBox OF Junk.VCX NOWAIT
>ASELOBJ(xx)
>xx[1].Width= 100
>xx[1].Writemethod("Click","WAIT WINDOW PROGRAM() NOWAIT" + CHR(13)+ "RETURN .T.")

>xx[1].Save()

Probably an example is just proof of concept, but the last line results in an error. There is no method "Save" for "mytextbox". My attempt to use SaveAsClass instead resulted in conflict with active "Modify Class". It would be nice to achieve closing "Modify Class" form automatically.