VB知道进程句柄 怎么获取该进程窗口的句柄 有几个列几个

窗体代码 在TEXT输入进程PID

Private Sub Command1_Click()

List1Clear

Find_Window Val(Text1Text)

End Sub

Private Sub Form_Load()

Text1Text = ""

Command1Caption = "枚举窗口"

End Sub

模块代码如下

Option Explicit

Private Declare Function EnumWindows Lib "user32" (ByVal lpEnumFunc As Long, ByVal lParam As Long) As Long

Private Declare Function GetWindowThreadProcessId Lib "user32" (ByVal hwnd As Long, lpdwProcessId As Long) As Long

Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long

Dim IfPid As Long

Private Function EnumWindowsProc(ByVal hwnd As Long, ByVal lParam As Long) As Long

Dim Pid1 As Long

Dim wText As String 255

GetWindowThreadProcessId hwnd, Pid1

If IfPid = Pid1 Then

GetWindowText hwnd, wText, 100

Form1List1AddItem "句柄:" & hwnd & " 标题:" & wText

End If

EnumWindowsProc = True

End Function

Public Sub Find_Window(ByVal Pid As Long)

IfPid = Pid

EnumWindows AddressOf EnumWindowsProc, 0

End Sub

版本 2

支持库 eAPI

程序集 窗口程序集1

程序集变量 L, 进程信息

程序集变量 B

子程序 _按钮1_被单击

局部变量 A, 整数型

L ＝ 取系统进程列表 ()

计次循环首 (取数组成员数 (L), A)

判断开始 (L [A]进程名称 ＝ 编辑框1内容)

B ＝ L进程标识符

跳出循环 ()

默认

判断结束

计次循环尾 ()

The GetProcessHandleFromHwnd function retrieves a process handle from a window handle

HANDLE WINAPI GetProcessHandleFromHwnd(

HWND hwnd,

);

这个函数通过窗口句柄获得进程句柄。有了进程句柄，PID是不是就知道怎么获得了？什么？不知道？那我告诉你，GetProcessId可以通过进程句柄获得进程ID：

DWORD WINAPI GetProcessId(

__in HANDLE Process

);

以上就是关于VB知道进程句柄 怎么获取该进程窗口的句柄 有几个列几个全部的内容，包括:VB知道进程句柄 怎么获取该进程窗口的句柄 有几个列几个、易语言 怎么写取进程句柄 稍微简单点、一个进程有很多窗口，怎么取这个进程的下所有窗口句柄等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！