ms-access - 用vba改变一个字段的值

Question

我想通过单击相关表格中的按钮将特定表格中的日期更改为今天的日期。所以所有按钮所做的就是更改我数据库中某个字段中的日期。有没有使用 VBA 执行此操作的简单方法？

*更新

好吧，我在我的 VBA 代码中写了这个:

CurrentDb.Execute "UPDATE Machines SET LastMaintenance = Date() WHERE MachineID = MachineID.Value"

“Machines”是我的表，“LastMaintenance”是包含必须更改为今天日期的日期的列，“MachineID”记录的名称和“MachineID.Value”绑定(bind)到同一记录的文本框的名称。

当我点击按钮时出现这个错误:

"Not enough parameters. 1 expected."

Answer 1

执行更新查询时，您需要了解每个字段的数据类型，因为您必须在代码中以不同方式呈现它。此外，您需要在插入变量时拆分字符串文本。在您当前的状态下，它正在查找内容为“MachineID.value”的 MachineID 字段。试试这个:

CurrentDb.Execute "UPDATE Machines SET LastMaintenance = Date() WHERE MachineID = " & MachineID.Value