基本上我有一张桌子上有一个coloumn“stock”和第二个coloumn“stockissued”。假如 stock coloumn具有值40这意味着商店中有40个商品,我希望每当我们为stockissued coloumn键入值时,库存的先前值会相应减少。就像在40个中我们以一种形式写出10个股票发行字段时,股票价值应该从40减少到30。
另一个重要的事情是,库存字段表单中的新记录应该每次更新先前递减的值。
我需要紧急帮助bcz从事一个项目!
答案 0 :(得分:0)
正如您所说,您正在将价值输入到表单上,这实际上非常简单。您可以在单击按钮时使用以下代码,或者在更新键入值的字段时将其设置为运行。
我的工作假设您在同一表格上有当前值和减少金额。
Dim UpdatedValue as string
UpdatedValue = Me.stock - Me.stockissued
Updatesql = " UPDATE YourTable SET YourTable.Stock=" & (UpdatedValue) & " " & _
"WHERE [YourTable]![RecordID] = Me.RecordID "
Docmd.runsql updatesql
显然你需要用你自己的表替换表名和字段名,我也加入了WHERE标准,应该确保你不会意外更新表中的所有记录!只是当前表格中活跃的那个