ThinkChat🤖让你学习和工作更高效,注册即送10W Token,即刻开启你的AI之旅 广告
## **描述** 根据进程名称返回窗体句柄,可以指定等待几秒检测指定进程名称的窗体是否出现,默认是等待10秒。 ## **语法** GetWindowByAppNameEx(*strAppName[, intWaitSeconds = 10[, hWndAll[, isUseRegExp = False[, windowVisible = AllWindow]]]]*) **该语法中有下列命名参数:** |参数|说明| | --- | ---| | strAppName | 必须的。String类型,表示要查找的窗口所属的进程名 ,例如:notepad.exe | | intWaitSeconds | 可选。Long类型,设置查找窗口最多等待多时秒。默认为10秒。 | | hWndAll| 可选的。String类型,函数获取的所有符合条件的句柄都放入到这个变量中。 | | isUseRegExp| 可选的。Boolean类型,表示是否正则进行匹配。默认为False,即不用正则匹配。 | | windowVisible | 可选的。enumWindowVisible类型,表示指定所需要获得的窗口可见属性。如果忽略,缺省值是 AllWindow,它表明不管什么状态(可见&不可见)的窗口都获取。关于enumWindowVisible类型的介绍请参考下面“**enumWindowVisible类型的设置值**”表的介绍。 | **enumWindowVisible类型的设置值:** | 设置 | 描述 | | --- | --- | | HiddenWindow | 隐藏的窗口 | | DisplayedWindow | 显示的窗口 | | AllWindow| 以上两种窗口都包含 | ## **返回值** | clsWindow | | --- | | 返回值为本身,方便连写 | ## **示例** > 示例1 > 说明:根据进程名notepad.exe得到其下窗口集合 ``` Dim w As New clsWindow Dim sHwndAll$ w.GetWindowByAppNameEx "notepad.exe", 3, sHwndAll MsgBox sHwndAll ``` > 示例2 > 说明:根据进程名notepad.exe得到其下“可见”(DisplayedWindow)窗口的集合, ``` Dim w As New clsWindow Dim sHwndAll$ w.GetWindowByAppNameEx "notepad.exe", 3, sHwndAll, , DisplayedWindow MsgBox sHwndAll ```