关于按钮的消息问题请教一下，斑竹

Question

Private Sub Command1_Click()
MsgBox ""
End SubPrivate Sub Command2_Click()
Command1_Click
End Sub

Answer 1

http://askpro.east.net.cn/cgi-bin/view.pl?004248
你可能知道在一个窗体的代码中，可以通过代码来运行按钮的Click()事件，如： 
    Command1_Click 
    但是这个Click()是私有的，你无法在另窗体或外部模块中调用。（译者注：这个说法有错误，你可以把Private改为Public，这样就可以在外部调用了。） 
    幸运的是，Visual Basic提供了一种方法让你可以“点击”按钮，这就是设置按钮的Value属性为True。例如，Form1包括三个按钮和以下过程： 
    Private Sub Command1_Click() 
    MsgBox "Button 1 clicked!" 
    End Sub 
     
    Private Sub Command2_Click() 
    MsgBox "Button 2 clicked!" 
    End Sub 
     
    Private Sub Command3_Click() 
    MsgBox "Button 3 clicked!" 
    End Sub 
    另一个窗体包括按钮，名叫btnTrigger，你可以使用下面的代码： 
     
    Private Sub btnTrigger_Click() 
    Form1.Command1.Value = True 
    Form1.Command2.Value = True 
    Form1.Command3.Value = True 
    End Sub 
     
    现在，假设两个窗体都被同时加载，当你点击 btnTrigger按钮时，Visual Basic执行Command1, Command2 and Command3的Click事件。

Answer 2

Public Const BM_CLICK = &HF5SendMessage command2.hwnd, BM_CLICK, 0, 0

Answer 3

Should be : SendMessage command1.hwnd, BM_CLICK, 0, 0 
:p