1条回答 默认 最新
- threenewbee 2017-11-18 03:17关注
Dim WithEvents cmd As CommandButton Set cmd = Controls.Add("VB.CommandButton", "btn1") 再编写一个方法 private sub btn1_click() msgbox "ok" end sub
本回答被题主选为最佳回答 , 对您是否有帮助呢?解决 1无用
Dim WithEvents cmd As CommandButton
Set cmd = Controls.Add("VB.CommandButton", "btn1")
再编写一个方法
private sub btn1_click()
msgbox "ok"
end sub