Как настроить кнопку для запуска метода в VBA

Question

У меня есть пользовательское приложение, которое я разрабатываю в vba.Я написал весь код, и единственное, что меня смущает, - это как настроить кнопку для «запуска» или «запуска» программы.В форме на стороне пользователя, пользователь введет номер элемента, затем будет нажата кнопка, которая вызывает набор полей и текстовых полей в новой маленькой форме для ввода пользователем. В окне отображаются значения по умолчанию иобновит / сохранит новые или обновленные поля и вставит их в базу данных.

Кнопка разработана в microsoft-gp, но я должен вручную написать ее для запуска программы.

Прямо сейчас, когда я нажимаю кнопку, всплывает окно, но в текстовых полях не отображается информация, а также не отображаются значения в выпадающем списке.

Вот начало моей программы.

 Private rs As Recordset

 Public Sub Main()
     DisplayWindow
     'Item Number is the primary field for pulling data 
     ScanTable ItemMaintenance.ItemNumber
     Cleanup
End Sub

 Private Sub DisplayWindow()
    'show vendor information screen
    frmItemProfile.txtItemNumber = ItemMaintenance.ItemNumber

'build combobox with values
    Build_Class_Group_ComboBox
    'Show the form
    frmItemProfile.Show
 End Sub

Когда я запускаю эти два метода в vba, информация отображается в форме и работает на 100%. Теперь мне нужно кодировать кнопку в исходной форме, так что это то, что у меня есть;Test = название кнопки

  Private Sub Test_Changed()
     frmItemProfile.Show
  End Sub

Как мне кодировать кнопку для правильного запуска программы?Если бы кто-нибудь мог пролить свет на эту проблему, я был бы очень признателен!Заранее спасибо!

Answer 1

Полагаю, вы пробовали:

Private Sub Test_Click()
    Main()
End Sub