vb.net 窗口句柄獲取進程名

FindWindowEx

成都創(chuàng)新互聯(lián)公司不只是一家網(wǎng)站建設(shè)的網(wǎng)絡(luò)公司；我們對營銷、技術(shù)、服務(wù)都有自己獨特見解，公司采取“創(chuàng)意+綜合+營銷”一體化的方式為您提供更專業(yè)的服務(wù)！我們經(jīng)歷的每一步也許不一定是最完美的，但每一步都有值得深思的意義。我們珍視每一份信任，關(guān)注我們的成都網(wǎng)站制作、網(wǎng)站建設(shè)質(zhì)量和服務(wù)品質(zhì)，在得到用戶滿意的同時，也能得到同行業(yè)的專業(yè)認可，能夠為行業(yè)創(chuàng)新發(fā)展助力。未來將繼續(xù)專注于技術(shù)創(chuàng)新，服務(wù)升級，滿足企業(yè)一站式全網(wǎng)營銷推廣需求，讓再小的成都品牌網(wǎng)站建設(shè)也能產(chǎn)生價值！

VB聲明

Declare Function FindWindowEx Lib "user32" Alias

"FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As

String, ByVal lpsz2 As String) As Long

說明

在窗口列表中尋找與指定條件相符的第一個子窗口

返回值

Long，找到的窗口的句柄。如未找到相符窗口，則返回零。會設(shè)置GetLastError

參數(shù)表

參數(shù)

類型及說明

hWnd1

Long，在其中查找子的父窗口。如設(shè)為零，表示使用桌面窗口（通常說的頂級窗口都被認為是桌面的子窗口，所以也會對它們進行查找）

hWnd2

Long，從這個窗口后開始查找。這樣便可利用對FindWindowEx的多次調(diào)用找到符合條件的所有子窗口。如設(shè)為零，表示從第一個子窗口開始搜索

lpsz1

String，欲搜索的類名。零表示忽略

lpsz2

String，欲搜索的類名。零表示忽略

VB.net 如何根據(jù)pid取得程序窗體句柄

你想要的應(yīng)該就是這個吧

'獲取進程id

Dim?p?As?Integer?=?Shell(TextBox1.Text)

'獲取進程id對應(yīng)的句柄

Dim?h?As?IntPtr?=?System.Diagnostics.Process.GetProcessById(p).Handle

'顯示進程id和對應(yīng)的句柄

Debug.Print(p)

Debug.Print(h.ToString)

vb.net如何通過窗口句柄顯示窗口

首先聲明一下API

在你窗口最頂?shù)奈恢蒙蠈懮?/p>

Private Declare Function 取窗口句柄 Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long

'由于VB支持中文的 我就定義成 取窗口句柄 這個了

'在窗體中添加一個按鈕里面放進下面代碼就OK了

Private Sub Command1_Click()

Dim 窗口句柄 As Long '聲明窗口句柄變量存儲

窗口句柄 = 取窗口句柄(vbNullString, "新建 文本文檔.txt - 記事本") '取窗口標題的句柄 把得到窗口標題句柄賦予給剛才 窗口句柄 這變量里

If 窗口句柄 = 0 Then '判斷窗口句柄是否等于0 如果等于0表示無法找到窗口句柄

MsgBox "無法找到需要的窗口句柄"

Else

MsgBox "已找到窗口句柄 句柄數(shù)為：" 窗口句柄

End If

End Sub