请问老师这段代码为何无法更改表的数据？

roych

如果我没记错的话，OpenRecordset应该是DAO的方法。既然用的是DAO嘛，自然要用DAO的方法了。

1. Set rst = CurrentDb.OpenRecordset(strSQL, adLockOptimistic, cnn)
   
2. rst.Edit
   
3. rst![库存数量] = rst![库存数量] - Me![数量]
   
4. rst.Update

复制代码

最后说一句，使用ADO或者DAO的记录集（recordset）时，最好加上父级集合。例如：

Dim rst As DAO.Recordset

这个问题，似乎每隔一段时间就会出现到在论坛上。
Dim rst 'As Recordset
看你注释掉后面的定义类型，相信你也遇到了错误。为什么？你知道了么？ADODB.Recordset是记录集，DAO.Recordset也是记录集。系统怎么知道你想用的是哪个记录集？
在无法判断的情况下（也就是这样定义时：Dim rst As Recordset），系统会根据优先级进行选择。如图所示：默认情况下DAO是优先于ADO的，所以，Dim rst As Recordset=Dim rst As DAO.Recordset。但低版本（例如DAO 3.6）或者人为不小心调整了顺序，则会出现错误。