MS Access中的VBA中不接受变量名称

时间:2018-03-04 15:48:38

标签: ms-access access-vba ms-access-2010

我有一个SQL VBA查询,用于在单击按钮时更新表单上的多个文本框中的值。

查询从表单上的多个标签名称标题中获取输入。因此Label1的标题将输入TextBox1Label2标题{/ 1}}等。

我正在尝试将标签名称通过变量传递给查询。但是,在生成变量Textbox2的值的行上返回以下错误:

  

" Microsoft Access无法找到您的表达中引用的字段& labelname&'

我的代码如下。我想使用一个变量,以便稍后我可以使它成为一个接受标签名称并返回记录集值的函数。通过这种方式,我将能够避免约。 150行代码,因为我必须使用相同数量的标签更新20到25个文本框。

b

1 个答案:

答案 0 :(得分:2)

你的表达:

b = [Forms]![Bal_Sheet]![& labelname &].Caption

没有连接字符串,因为[Forms][Bal_Sheet]引用了对象。

相反,你应该使用:

b = Forms("Bal_Sheet").Controls(labelname).Caption