MS Access - переменная вызова VBA

Question

Я использую VBA для разработки кода, который автоматически откроет форму Access, когда будет выполнено условие. Часть Кодекса заключается в следующем:

Private Sub Command10_Click() 

DoCmd.RunCommand acCmdRefresh 

DoCmd.OpenForm "NAME_OF_FORM", acNormal, "", "[NUMBER] = 500", , acHidden 

Вместо установки «[НОМЕР] = 500», я хочу дать переменную. Скажем:

Dim Test as String 

Test = 500 

Когда я пытаюсь запустить следующее:

DoCmd.OpenForm "NAME_OF_FORM", acNormal, "", "[NUMBER] = Test", , acHidden 

Команда не работает, но он работает, когда я даю условие «[НОМЕР] = 500».

Вы можете что-нибудь предложить?

Answer 1

Вы должны использовать конкатенацию строк. Вы объединяете две строки с амперсандом: &

Dim Test as String 
Test = 500 

DoCmd.OpenForm "NAME_OF_FORM", acNormal, "", "[NUMBER] =" & Test, , acHidden