全部显示

CreateObject 方法

       

创建指定类的自动化对象。若应用程序已处于运行状态,CreateObject 将创建新实例。

使用该方法可从 VBScript 自动运行其他的应用程序。但不应从 VBScript 自动运行 Outlook。

注意  CreateObject 方法常在此“帮助”文件中的示例代码(单击“示例”时出现)中使用,该方法在 Microsoft Visual Basic (VB) 或 Microsoft Visual Basic for Applications 中可用。这些示例使用的方法与作为 Outlook 对象模型的一部分实现的 CreateObject 方法不同。

expression.CreateObject(ObjectName)

expression   必选。该表达式返回 Application 对象。

ObjectName  必选,String 类型。要创建的对象的类名。关于有效类名的信息,请参阅 OLE 程序标识符

示例

本 VBScript 示例利用项目Open 事件来访问 Microsoft Internet Explorer 并显示 Microsoft Web 页。

Sub Item_Open()
   Set Web = CreateObject("InternetExplorer.Application")
   Web.Visible = TRUE
   Web.Navigate "www.microsoft.com"
End Sub

本 VBScript 示例利用项目上的 CommandButton 控件的 Click 事件访问 Microsoft Word 并在根目录打开名为“Resume.doc”的文档。

Sub CommandButton1_Click()
    Set Word = CreateObject("Word.Application")
    Word.Visible = TRUE
    Word.Documents.Open("C:\Resume.doc")
End Sub