从Access中的表单更改表中的字段

Question

很抱歉，如果这是一个新手问题，我在Access中有点生疏，甚至在Visual Basic中更生锈！

当我改变另一个（不相关）形式的字段时，我正试图找到一种更改表中字段的方法。更具体地说，我正在采用一种方法来减少表格中的数字，无论表格字段中的值是什么（以库存控制方式）

有人知道这样做的最佳方法吗？

Answer 1

最好的方法可能是通过VBA运行更新查询，例如：

Dim db As Database
Dim strSQL as String

Set db=CurrentDB

strSQL="UPDATE Stock SET InStock=Instock-" & Me.OrderQty & " WHERE ID=" & Me.ID

db.Execute strSQL, dbFailOnError

MsgBox "Updated " & db.RecordsAffected & " record(s)"