求助：VBE右键菜单

tmtony

需要 使用withevent 才能 使用事件

tmtony

Option Explicit
‘ 定义CommandButton的对象变量cmd，使用WithEvents关键字，用来引用CommandButton对象的事件，cmd变量作为MyClass的属性
Public WithEvents cmd As CommandButton

要 set cmd=Application.VBE.CommandBars("Code Window").Controls.add .........


‘ 为cmd对象编写Click事件过程（这里就是编写的通用事件）
Private Sub cmd_Click()
  MsgBox cmd.Caption  ‘弹出对话框，显示cmd对象的Caption名
End Sub