FindWindowEx

創(chuàng)新互聯(lián)是一家集網站建設,曲陽企業(yè)網站建設,曲陽品牌網站建設,網站定制,曲陽網站建設報價,網絡營銷,網絡優(yōu)化,曲陽網站推廣為一體的創(chuàng)新建站企業(yè),幫助傳統(tǒng)企業(yè)提升企業(yè)形象加強企業(yè)競爭力。可充分滿足這一群體相比中小企業(yè)更為豐富、高端、多元的互聯(lián)網需求。同時我們時刻保持專業(yè)、時尚、前沿,時刻以成就客戶成長自我,堅持不斷學習、思考、沉淀、凈化自己,讓我們?yōu)楦嗟钠髽I(yè)打造出實用型網站。
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,找到的窗口的句柄。如未找到相符窗口,則返回零。會設置GetLastError
參數表
參數
類型及說明
hWnd1
Long,在其中查找子的父窗口。如設為零,表示使用桌面窗口(通常說的頂級窗口都被認為是桌面的子窗口,所以也會對它們進行查找)
hWnd2
Long,從這個窗口后開始查找。這樣便可利用對FindWindowEx的多次調用找到符合條件的所有子窗口。如設為零,表示從第一個子窗口開始搜索
lpsz1
String,欲搜索的類名。零表示忽略
lpsz2
String,欲搜索的類名。零表示忽略
首先聲明一下API
在你窗口最頂的位置上寫上
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 "已找到窗口句柄 句柄數為:" 窗口句柄
End If
End Sub
因為你窗口關閉的時候Time并沒有釋放,但是此時Label已經不能訪問了 才會出現(xiàn)窗口句柄出錯,你試試加上下面的話 Private Sub Form1_FormClosing(ByVal sender As SystemObject, ByVal e As SystemWindowsFormsFormClosingEventArgs) Handlesvbnet 創(chuàng)建窗口句柄時出錯,Timer 中出現(xiàn)問題
因為你窗口關閉的時候Time并沒有釋放,但是此時Label已經不能訪問了
才會出現(xiàn)窗口句柄出錯,你試試加上下面的話
Private Sub Form1_FormClosing(ByVal sender As System.Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles MyBase.FormClosing
timer1.Close()
timer2.Close()
End Sub
應該就不會報錯了。
希望能幫到你。
分享題目:vbnet窗口句柄,vb獲取句柄
本文地址:http://chinadenli.net/article15/dsichdi.html
成都網站建設公司_創(chuàng)新互聯(lián),為您提供網頁設計公司、響應式網站、App開發(fā)、ChatGPT、營銷型網站建設、網站設計
聲明:本網站發(fā)布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創(chuàng)新互聯(lián)