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でこれら2つのメソッドを実行すると、情報がフォーム上に表示され、私はこれは私が持っているものであるように、元のフォーム上のボタンをコーディングする必要が今は100％ に動作します。テスト=ボタンの名前

Private Sub Test_Changed() 
    frmItemProfile.Show 
    End Sub 

プログラムを正しく実行するためにボタンをコーディングするにはどうすればよいですか？誰かがこの問題について光を当てることができたら、私はそれを高く評価します！前もって感謝します！

Answer 1

私はあなたが試したと仮定します。

Private Sub Test_Click() 
    Main() 
End Sub