VB.net中通过窗口名称取得后台窗口句柄

前端之家收集整理的这篇文章主要介绍了VB.net中通过窗口名称取得后台窗口句柄前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
  1. 下面是VB.net代码 VB的区别在于数据类型 vblong4bytevb.net中间Integer4byte 用的时候写法要互相转换一下 不放心的话可以都写成Int32
      1. PublicClassForm1
      1. PrivateDeclareFunctionFindWindowLib"user32"Alias"FindWindowA"(ByVallpClassNameAsString,ByVallpWindowNameAsString)AsInteger
      1. PrivateDeclareFunctionFindWindowExLib"user32"Alias"FindWindowExA"(ByValhWnd1AsLong,ByValhWnd2AsLong,ByVallpsz1AsString,ByVallpsz2AsString)AsInteger
      1. PrivateDeclareFunctionSendMessageLib"user32"Alias"SendMessageA"(ByValhwndAsInt32,ByValwMsgAsInt32,ByValwParamAsInt32,ByVallParamAsInt32)AsInt32
      1. PrivateSubButton1_Click(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesButton1.Click
      1. DimmyhwndAsInteger
      1. DimsubHwndAsInteger
      1. myhwnd=FindWindow("Notepad","test.txt-メモ�")
      1. subHwnd=FindWindowEx(myhwnd,"Edit",0)
      1. SendMessage(subHwnd,&H302,0)
      1. 'MsgBox(subHwnd)
      1. EndSub
      1. EndClass
        
    1.   
        1. myhwnd=FindWindow("Notepad","test.txt-メモ�")

        FindWindow查找窗口句柄@H_403_124@

        两个参数,第一个是类名,第二个是窗口的标题,返回值是窗口句柄
        不清楚的情况下,两个参数中间的一个可以设成0@H_403_124@

           
      1.    
          1. subHwnd=FindWindowEx(myhwnd,"Edit",0)
        1. FindWindowEx查找子窗口句柄 4个参数,  第一个是父窗口句柄,  第二个是子窗口次序(父窗口下第几个子窗口),  第三个是子窗口类型,  第四个是子窗口名字 
        2.  
        3.   
        4.   
            1. SendMessage(subHwnd,0)
            SendMessage将指定的消息发送到一个或多个窗口 此函数太过于强大,不多做解释
            总之消息不是普通的字符串, 而是包括鼠标,键盘等一切消息 这里&H302消息为粘贴到指定句柄
          1.  

          猜你在找的VB相关文章