add class addobject 方法 create class create classlib createobject( ) modify class release classlib set procedure set oleobject