全部显示

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 Office Access 2003 对象库的引用，然后创建 Application 类的新实例并为其指定一个对象变量，如以下示例所示：

Dim appAccess As New Access.Application

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

Dim appAccess As Object

Set appAccess = CreateObject("Access.Application")

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

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

appAccess.DoCmd.OpenForm "Orders"

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