Vba 代码中的数据类型不匹配-为什么是现在？

到目前为止，我的代码一直运行良好-但由于未知原因，它不再工作，并作为错误抛出：

Run-time error '13':
Type mismatch

以下是发生错误的地方：

Dim rst As Recordset
Set rst = CurrentDb.OpenRecordset("qryGetEventsByNonPharmacists")

该查询已存在，它是一个基本的SELECT查询。这以前从来都不是问题，为什么会抛出错误

---

谢谢

这应该是：

Dim rst As DAO.Recordset

---

虽然只要您没有ADO库的引用，或者ADO库位于DAO库之后，您就可以不使用记录集，但在大多数情况下，您最好始终使用记录集的库的显式引用。

这可能是：

Dim rst As DAO.Recordset

---

虽然只要您没有ADO库的引用，或者ADO库位于DAO库之后，您就可以使用记录集，但在大多数情况下，您最好始终使用记录集的库的显式引用。

查询本身呢？这会有错误吗？不，不会。这是我第一件要看的东西。查询本身呢？那会有错误吗？不会，我第一眼看到的是atI添加了一条评论。此外，您可能以前使用过sql字符串。我开始理解为什么人们不喜欢VBA信任我，他们彼此都一样坏：）我添加了一条评论。另外，您以前可能使用过sql字符串。我开始理解为什么人们不喜欢VBA信任我，因为他们彼此都很糟糕：）