ACCESS 数据库 vba 数据类型不匹配

Question

一直提醒类型不匹配
求解

Answer 1

根据你提供的截图，可以看出是因为在VBA代码中使用了不匹配的数据类型，导致出现了类型不匹配的错误。具体地说，是因为在将变量rs生命为Recordset类型时，却使用了Set rs = db.Execute(sql)，即将Recordset类型的rs赋值为Execute方法返回的结果，而Execute返回的并不是Recordset类型，而是一个Long类型的整数值。

解决这个问题的方法是，将rs声明为Recordset类型，在使用它时，通过rs.Open方法打开对应的记录集。例如：

Dim rs As Recordset
Set rs = db.OpenRecordset(sql)

这样就可以避免类型不匹配的错误了。希望这个解答能够帮助到你！