Question

自Win95以来，我一直在使用MSAccess进行编码。多年来，这些应用程序已升级到最新版本的MSAccess。我猜想该更改是在Access 2003之后的某个时候发生的。

我确定这是一个琐碎的问题，但是我似乎无法在在线文档中找到答案。

过去，我的模块看起来像这样：

    Option Compare Database

    Private Sub PrintReports_Click()
    Dim db As Database
    Dim rs As Recordset
        Set db = CurrentDb
        Set rs = db.OpenRecordset("Classes", dbOpenDynaset)
...

“类”通常是数据库中的表或查询。在已转换为最新版本的较旧数据库中，此功能仍然有效。

当我尝试使用上述代码创建新数据库时，出现错误13，键入不匹配错误，没有解释什么是错误以及如何解决它。

所以有2个问题：为什么它不能在旧数据库上工作，而不能在新创建的数据库上工作？在我的VBA代码中打开和引用我的表的正确方法是什么？

感谢您的帮助，丹

Answer 1

尝试检查“参考”，是否缺少任何内容还声明数据库，如下所示：

Dim db As DAO.Database

MSAccess VBA编码中的更改

1 个答案: