我正在使用VBA开发一个代码,当满足条件时会自动打开Access表单。该守则的一部分如下:
Private Sub Command10_Click()
DoCmd.RunCommand acCmdRefresh
DoCmd.OpenForm "NAME_OF_FORM", acNormal, "", "[NUMBER] = 500", , acHidden
我想提供一个变量,而不是设置“[NUMBER] = 500”。让我们说:
Dim Test as String
Test = 500
当我尝试运行以下内容时:
DoCmd.OpenForm "NAME_OF_FORM", acNormal, "", "[NUMBER] = Test", , acHidden
命令不会运行,但是当我给出条件“[NUMBER] = 500”时它会运行。
你能提出什么建议吗?
答案 0 :(得分:1)
您必须使用字符串连接。您将两个字符串与&符号结合使用:&
Dim Test as String
Test = 500
DoCmd.OpenForm "NAME_OF_FORM", acNormal, "", "[NUMBER] =" & Test, , acHidden