Question

我是VBA和Access的新手，但我确实有一些了解。

我可以使用

轻松设置字段

[Field1] = Now()

我想要做的是将字段名称保存到字符串中，并使用该变量引用该字段。通过这种方式，我可以将不同的字段名称保存到变量中，并使代码根据哪个字段名称进行存储。

从我能找到的，正确的方法是在我的情况下：

Private Sub ctlUpdateButton_Click()
Dim varField as String
    varField = Dlookup("[Targeted Field]", "[Other Table]")

Cases.Fields(varField) = Now()
End Sub

此代码在对Cases.Fields（varField）的引用中断，并将错误报告为“运行时错误”424“对象必需。”

表单的记录源是基于Cases表的查询。

我对我正在使用的内容不太熟悉，知道这是否是一个充分的解释。

Answer 1

不确定您尝试使用varField = Dlookup("[Targeted Field]", "[Other Table]")

做什么

DLookup返回另一个表中字段的值该表中只有一行吗？如果是这样 - 那么你的代码将在理论上运作 - 如果没有，您将必须指定标准以找到正确的行

最后一个问题是您无法直接在代码中使用表名（在您的情况下＆＃34;案例＆＃34;）

如果您想更改表单中的基础记录，如果字段名称在您的查询中并且尚未重命名，则可以对其进行修改。

只需使用Me(varField) = Now()

即可

我如何引用一个表来通过Access中的VBA字符串设置字段值？

1 个答案: