VB如何获取鼠标所点击的按钮控件（其他程序）的按钮句柄？

我想做一个程序，在鼠标点击其他程序窗体上的按钮时可以得到相应窗体的句柄和控件句柄，并截获消息。
这该怎么做呢？
请大侠们最好给我源码学习学习。

不是截获，是监听。我现在就是不知到如何让程序得到我鼠标所点击的按钮的句柄和消息

截获消息难哦，要用hook
获取句柄还是容易的
用getcursorpos和windowfrompoint就能实现

======================
要监听消息也要用hook,你可以去参考syp++

Private Declare Function GetCursorPos Lib "user32" (lpPoint As Any) As Long
Private Declare Function WindowFromPoint Lib "user32" (ByVal xPoint As Long, ByVal yPoint As Long) As Long

Public Function hWndFromCusror() As Long
Dim a(1) As Long
GetCursorPos a(0)
hWndFromCusror = WindowFromPoint(a(0), a(1))
End Function

向按钮发送坐标1,1的左键按下左键弹起消息就是了 其中wm_lbuttondown，wm_lbuttonup的常量值以及postmessage的声明可以在api浏览器查。gwnd是句柄 postmessage gwnd, wm_lbuttondown, 0, byval (1 + 1 * 65536) postmessage gwnd, wm_lbuttonup, 0, byval (1 +1 * 65536)

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息