怎么在程序中为控件指定事件

如何在程序中为控件指定事件？
我想在模块里面为form1里面的button指定click事件，请问怎样做？

[解决办法]
没看懂，是这个意思吗：
Form1.Command1_Click
注意，首先要将Form1的Command1_Click过程，声明为public的，即：
Public Sub Command1_Click()
[解决办法]
意思是某个按钮的Click事件调用另一个按钮的Click的事件么?
如过是,那你直接在要调用的按钮的Click事件里把要调用的Click事件过程写上即可!
如:(以下代码示例了Command1调用Command2的事件)
Private Sub Command1_Click()
Call Command2_Click
End Sub

Private Sub Command2_Click()
MsgBox "Test "
End Sub
[解决办法]
你也可以把这些 command 做成空间数组，然后在
private sub command1_click(index as integer)
里面可以统一的为他们增加事件。附加的 index 属性可以用来区别到底是哪个按钮触发了 click。