相关疑难解决方法(0)

我正在使用以下代码在Excel用户表单上动态创建按钮:

With Me.CurrentFrame.Controls.Add("Forms.CommandButton.1")
    .Caption = "XYZ"
    .name = "AButton"
    .Font.Bold = True
    .ForeColor = &HFF&
    ... blah blah blah
End With

我想在单击这些按钮时分配一个函数来运行,但我找不到一种直接的方法来执行此操作,因为按钮本身没有属性.

有没有办法用上面的习语做到这一点？我应该以不同的方式处理这整件事吗？