vb中如何获得一个窗口的句柄

Posted 2023-03-14

这个窗口是一个picturebox，我要获得他的句柄，以便应用lineto和movetoex函数
望知道者告知，不胜感激！！！！！
可以的话最好带代码！！！！！
下面是代码，我按niusoft的方法做的，但是没有波形啊
谁知道那里有问题吗？
Private Sub Command3_Click()
Dim i As Long
LpPoint1.X = 0
LpPoint1.Y = 3240
While (i < 30000)
data_tab_ch1(i) = 3
i = i + 1
Wend
i = 0
While (i < 30000)
RESULT = MoveToEx(Picture1.hWnd, i, data_tab_ch1(i), LpPoint1)
RESULT = LineTo(Picture1.hWnd, i, data_tab_ch1(i + 1))
i = i + 1
Wend
End Sub
还有，好像没有hwnd这个属性
这个程序就是一点按钮就在picture1中显示波形，其中picture1是个picturebox
知道的帮帮忙啊

参考技术A 声明：Declare Function GetForegroundWindow Lib "user32" () As Integer

句柄=GetForegroundWindow()

这个是获得活动窗口的句柄。 参考技术B picture1.hwnd 用hwnd这个属性就可以了，这个属性就代表此控件的句柄本回答被提问者采纳 参考技术C 用EnumThreadWindows或者EumWindows来获取到本进程的窗口

或者使用FindWindow()！ 参考技术D niusoft最为简单，正确