当设置了对其他应用程序类型库的引用以后,就可以在代码中使用由该应用程序所提供的对象。例如,如果在 Microsoft Access 中设置了对 Microsoft Excel 库的引用,就可以通过自动化(以前称为 OLE 自动化)使用 Microsoft Excel 对象。如果设置了对另一个 Microsoft Access 数据库中的 Visual Basic 项目的引用,就可以调用它的公共过程。如果设置了对 ActiveX 控件的引用,就可以使用 Microsoft Access 窗体上的该控件。
可以在 Microsoft“Visual Basic 编辑器”打开时,从 Microsoft Access 中设置引用,也可以在 Visual Basic 代码中设置引用。
设置对应用程序类型库的引用:
1. | 在“工具”菜单上,单击“引用”。只有在“设计”视图中打开了“模块”窗口并且该窗口是活动窗口,“工具”菜单上的“引用”命令才可用。 |
2. | 选中要引用其类型库的应用程序复选框。 |
若要从 Visual Basic 设置引用,需要新建一个 Reference 对象来代表所需要的引用。References 集合中包含了所有当前设置的引用。
若要创建新的 Reference 对象,请使用 References 集合中的 AddFromFile 或 AddFromGUID 方法。若要删除 Reference 对象,请使用 Remove 方法。
如果在使用其他应用程序的对象之前,事先设置对其类型库的引用,“自动化”代码将执行得更快。在设置了一个引用之后,可以声明一个对象变量,该对象变量以其最具体的类型代表其他应用程序中的对象。例如,如果编写了用于处理 Microsoft Excel 对象的代码,可以使用下面的语法(仅在创建了对 Microsoft Excel 类型库的引用的情况下),声明 Excel.Application 类型的对象变量:
Dim appXL As New Excel.Application
如果没有设置对 Microsoft Excel 类型库的引用,就必须将变量声明为 Object 类型的通用变量,下面的代码执行得较慢:
Dim appXL As Object
此外,如果设置了对某个应用程序的类型库的引用,则它的所有对象,以及对象的方法和属性,都会列在“对象浏览器”的列表中,这样可以很容易地确定每个对象可以使用哪些属性和方法。
因为 Microsoft Access 是一种支持“自动化”的 COM 组件,所以也可以从其他应用程序中设置对它的类型库的引用,并且可以从该应用程序中使用 Microsoft Access 对象。