thank you for reading my question

解决方案 »

  1.   

    function CreateOleObject(const ClassName: string): IDispatch;  //返回一个接口
    这是个全局函数Procedure CreateObject(const OleClassName: string; Iconic: Boolean);
    这是TOleContainer (容器)的一个方法.
      

  2.   

    在DELPHI中有这样几个相似的东西..
    //------------------------------------------------------------------------
    procedure TOleContainer.CreateObject(const OleClassName: string;
      Iconic: Boolean);   TOleContainer的一个方法,作用是创建TOleContainer一个嵌入的OLE对象.//------------------------------------------------------------------------ function CreateComObject(const ClassID: TGUID): IUnknown;   创建一个COM对象
    //------------------------------------------------------------------------function CreateOleObject(const ClassName: string): IDispatch;   创建一个支持IDispatch的COM对象,也就是创建一个自动化对象.
    其中CLASSNAME参数可以是Prog ID,比如'Word.Basic',也可以是GUID串
    VB一般来说只能使用实现了IDispatch接口的COM对象,
    也就是说它的CreateObject相当于DELPHI中CreateOleObject