Private Sub Command1_Click()Command2_ClickMsgBox "command1"End SubPrivate Sub Command2_Click()MsgBox "command2"End Sub
第一个按钮的代码中写call command2_click或把第二个按钮的代码全部放入一个sub第一个按钮和第二个按钮 调用就行