编程论坛 → VB.NET论坛

如何获得桌面上任意窗口的句柄

g12339645 发布于 2020-07-30 17:15， 4621 次点击

最好用vb2010
如何获得桌面上任意窗口的句柄？
具体要求：
比如现在windows运行有程序A、B、C,
打开我的程序，用鼠标点程序B窗口（或C），
在我的程序中得到程序B的句柄HANDLE。

谢谢！

[此贴子已经被作者于2020-8-9 17:07编辑过]

4 回复

g123396452020-08-09 17:06

用PROGRESS进程解决

apull2020-08-11 17:17

用API

程序代码：

Private Declare Function GetForegroundWindow Lib "user32" () As Long

Private Sub Timer1_Timer()
    Dim wnd As Long
    Dim s As String
    wnd = GetForegroundWindow()
    s = "当前活动窗口句柄：" + Str(wnd) + "  Hex：" + Hex(wnd)
    Text1.Text = s
End Sub

g123396452020-08-16 19:15

以下是引用apull在2020-8-11 17:17:05的发言：

用API

Private Declare Function GetForegroundWindow Lib "user32" () As Long

Private Sub Timer1_Timer()
    Dim wnd As Long
    Dim s As String
    wnd = GetForegroundWindow()
    s = "当前活动窗口句柄：" + Str(wnd) + "  Hex：" + Hex(wnd)
    Text1.Text = s
End Sub

HEX是什么？
https://blog.bccn.net/g12339645/67367

[此贴子已经被作者于2020-8-16 19:16编辑过]

apull2020-08-16 22:41

HEX是16进制显示wnd，spy++里面一般我都用16进制显示，这么做是为了好对比，判断句柄获取的对不对。实际使用中还是要用long