关于WINDOWS消息的截获！用程序运行这个form1后，程序自动点击那个command1按钮！

Question

有一个窗口form1 
他的标题 caption  为 ABCD在这个FORM1 上有一个按钮 command1如何用程序实现！
用程序运行这个form1后，程序自动点击那个command1按钮！注意那个FORM1没有原代码！不能通过CALL来实现！

Answer 1

Option Explicit
Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Long) As Long
Private Const BM_CLICK As Long = &HF5Private Sub Command1_Click()
    MsgBox "U clicked me!!!"
End SubPrivate Sub Form_Load()
    SendMessage Command1.hwnd, BM_CLICK, 0&, 0&
End Sub

Answer 2

SendMessage, SendMessageBynum, SendMessageByString VB声明 
Declare Function SendMessage& Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any)
Declare Function SendMessageBynum& Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As Long)
Declare Function SendMessageByString& Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, ByVal lParam As String) 
说明 
调用一个窗口的窗口函数，将一条消息发给那个窗口。除非消息处理完毕，否则该函数不会返回。SendMessageBynum， SendMessageByString是该函数的“类型安全”声明形式 
返回值 
Long，由具体的消息决定 
参数表 
参数 类型及说明 
hwnd Long，要接收消息的那个窗口的句柄 
wMsg Long，消息的标识符 
wParam Long，具体取决于消息 
lParam Any，具体取决于消息 

Answer 3

sendmessage
依次发送以下消息：
WM_LBUTTONDOWN
WM_CLICK
WM_LBUTTONUP

Answer 4

你要是想屏蔽窗口，用
sendmessage 发送 wm_close 消息