怎么点击一个按钮时触发另一个按钮的点击事件

如何点击一个按钮时触发另一个按钮的点击事件
Private   Sub   Command1_Click()
        MsgBox   "imafool "
End   Sub

Private   Sub   Command2_Click()
        Command1.Click
End   Sub


请问以上语句为什么不行？我应该怎么实现？

[解决办法]
函数的事件可以认为是一个可以调用的函数。
Command1_Click
直接调用就可以，或者Command1.Value = True
这样也可以达到调用按钮点击事件的目的。

═══════════════════
http://www.egooglet.com 资料、源码下载

http://bbs.j2soft.cn 论坛交流
═══════════════════
[解决办法]
Option Explicit

Private Sub Command1_Click()
MsgBox "imafool "
End Sub

Private Sub Command2_Click()
Command1_Click
End Sub