使用 vba 更改字段的值

Question

我想通过单击相关表单中的按钮将特定表中的日期更改为今天的日期。所以按钮所做的就是更改我数据库中某个字段中的日期。有没有一种简单的方法可以用 VBA 做到这一点？

*更新

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

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

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

当我单击按钮时，出现此错误：

“没有足够的参数。1 个预期。”

Answer 1

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

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