按钮这个控件怎么用？

看以前有人提问过，直接被无视了。。 我再问问吧。
把按钮控件拖到单据上， 那么这个按钮的单击事件怎么弄呢？
有的话最好给个demo

CommandName的值是区分大小写的，默认叫FButton，你写成fbutton就无法判断。建议统一转换成大写或小写再进行比较。

[code]
'定义 BillEvent 接口. 必须具有的声明, 以此来获得事件
Private WithEvents m_BillInterface As BillEvent

Public Sub Show(ByVal oBillInterface As Object)

'BillEvent 接口实现
'注意: 此方法必须存在, 请勿修改
Set m_BillInterface = oBillInterface

End Sub

Private Sub Class_Terminate()

'释放接口对象
'注意: 此方法必须存在, 请勿修改
Set m_BillInterface = Nothing

End Sub

Private Sub m_BillInterface_CommandClick(ByVal CommandName As String, bCancel As Bo