VB 获取其他程序某个按钮的句柄，实现点击操作

Posted 2023-03-09

参考技术A 截获消息难哦，要用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 参考技术B 使用
FindWindow
及
GetDlgItem
查找按钮控件句柄，使用
SendMessage
给这个按钮发送
WM_LBUTTONDOWN
和
WM_LBUTTONUP
消息模拟鼠标点击。