Access VBA教程:Application对象

Application
多个对象

Application对象引用活动的 Microsoft Access 应用程序。

使用 Application对象

Application对象包含所有Microsoft Access对象和集合。

使用 Application对象,可以将方法或属性设置应用于整个 Microsoft Access 应用程序。例如,可以在 Visual Basic 中使用 Application对象的SetOption方法来设置数据库选项。下面的示例显示如何在“选项”对话框中“视图”选项卡的“显示”下设置“状态栏”复选框。


Application.SetOption "Show Status Bar", True

Microsoft Access 是一个支持自动化(以前称为 OLE 自动化)的 COM 组件。用户可以从其他也支持“自动化”的应用程序中处理 Microsoft Access对象。要做到这点,必须使用 Application对象。

例如,Microsoft Visual Basic 是一个 COM 组件,可以从 Visual Basic 打开 Microsoft Access 数据库并处理其对象。首先从 Visual Basic 创建对 Microsoft Access 10.0对象库的引用,然后创建 Application类的新实例并为其指定一个对象变量,如以下示例所示:


Dim appAccess As New Access.Application

从不支持 New 关键字的应用程序,可以通过用 CreateObject函数来创建 Application 类的新实例:


Dim appAccess As Object
Set appAccess = CreateObject("Access.Application")

创建 Application 类的新实例之后,即可使用OpenCurrentDatabaseNewCurrentDatabase方法打开或新建数据库。然后,可以设置 Application对象的属性并调用其方法。通过用 Application对象的CommandBars属性返回对 CommandBars对象的引用时,可以使用该引用来访问所有的 Microsoft Office XP命令栏对象和集合。

还可以通过 Application对象处理其他 Microsoft Access对象。例如,通过使用 Microsoft AccessDoCmd对象的OpenForm方法,可以在 Microsoft Excel中打开 Microsoft Access 窗体:


appAccess.DoCmd.OpenForm "Orders"

有关创建引用和使用“自动化”控制对象的详细信息,请参阅作为 COM 组件的应用程序的文档。

上页:Access VBA教程:AllFunctions集合 下页:Access VBA教程:BoundObjectFrame对象

Access VBA教程:Application对象

Access VBA教程:BoundObjectFrame对象 Access VBA教程:CheckBox对象
Access VBA教程:CodeData对象 Access VBA教程:CodeProject对象
Access VBA教程:ComboBox对象 Access VBA教程:CommandButton对象
Access VBA教程:Control对象 Access VBA教程:CurrentData对象
Access VBA教程:CurrentProject对象 Access VBA教程:CustomControl对象
Access VBA教程:DataAccessPage对象 Access VBA教程:DefaultWebOptions对象
Access VBA教程:DoCmd对象 Access VBA教程:Form对象
Access VBA教程:FormatCondition对象 Access VBA教程:GroupLevel对象
Access VBA教程:Hyperlink对象 Access VBA教程:Image对象
Access VBA教程:Label对象 Access VBA教程:Line对象
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号