引用当前数据库

时　间:2015-04-23 13:18:06
作　者:yxm   ID：42182  城市：南京
摘　要:学习引用数据库的语句
正　文:

数据库对象的引用：Set语句，CurrentDb方法，Name属性

        DAO是一个数据库访问接口，通过它可以访问数据库。在Access 2010中，如果要使用DAO，首先需要引用支持DAO方法的支持库。比如“Microsoft Office 14.0 Access database engine Objiect Library”支持库，或者“Microsoft Dao 3.6 Objiect Library”支持库，然后才能够使用DAO方法访问数据库。

        引用支持库的方法：进入VBA编辑器，执行“工具/引用”命令，然后选中所需的支持库名称前面的复选框，单击确定即可。

     引用了支持库DAO方法的支持库之后，就可以使用DAO方法访问数据库了，比如，访问当前的数据库，首先要定义一个DAO数据库对象变量，然后使用Set 语句和CurrentDb方法将其赋值为当前的数据库，具体操作如下：语法：

Dim  [变量名] As DAO.Database
Set  [变量名]=CurrentDb()
 '获取数据库的完整路径
  [数据库变量名].Name
 '使用完数据库对象变量后，需要关闭数据库并释放数据库变量
 [变量名].Close
Set[变量名]=Nothing

 例：