版权声明:本文为博主原创文章,转载请在显著位置标明本文出处以及作者网名,未经作者允许不得用于商业目的。
二、获得Ie窗口句柄
通过上一小节的教程,我们可知Ie窗口的类名为 IEFrame
那么通过 FindWindowEx() api函数就可以枚举 Ie窗口句柄:
具体代码如下:
''' <summary>
''' 获得所有的IE窗口hwnd
''' </summary>
''' <returns></returns>
''' <remarks></remarks>
Private Function findAllIe() As ArrayList
Dim IEHwndArray As New ArrayList
Dim result As Integer
'需要查找类名 IEFrame
Dim ieClass As String = "IEFrame"
Try
'获得第一个打开的IE窗口
result = FindWindowEx(0, 0, ieClass, Nothing)
Do While result <> 0
IEHwndArray.Add(result)
'获得下一个IE窗口,直到返回0
result = FindWindowEx(0, result, ieClass, Nothing)
Loop
Catch ex As Exception
Return IEHwndArray
End Try
Return IEHwndArray
End Function
FindWindowEx:
说明:在窗口列表中寻找与指定条件相符的子窗口
返回值:返回查找到的窗口的句柄
result = FindWindowEx(0, 0, ieClass, Nothing)
参数1=0:以桌面窗口为父窗口,查找桌面窗口的所有子窗口
参数2=0:窗口句柄,设置为0表示从第一个参数指定的窗口的第一个子窗口开始查找
参数3=窗口类名:这里设置为IEFrame,即查找IE窗口
参数4=Nothing:不指定窗口标题,所有窗口全匹配
第二次循环调用FindWindowEx,
result = FindWindowEx(0, result, ieClass, Nothing)
使用第一次获得result作为第2参数,即从这个句柄的下一个子窗口句柄查找
通过以下代码验证上述代码:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim listIe As New ArrayList
listIe = findAllIe()
If listIe.Count > 0 Then
For i As Integer = 0 To listIe.Count - 1
ListBox1.Items.Add(CType(listIe.Item(i), Integer).ToString)
Next
End If
End Sub
在ListBox中列出当前打开的Ie窗口,这里打开了2个Ie窗口:
由于.net平台下C#和vb.NET很相似,本文也可以为C#爱好者提供参考。
学习更多vb.net知识,请参看vb.net教程 目录
————————————————
版权声明:本文为CSDN博主「VB.Net」的原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接及本声明。