Sub 遍历窗口(父窗口)
Dim HwndEx
Do
HwndEx = Plugin.Window.FindEx(父窗口, HwndEx, 0, 0)
If HwndEx Then
TracePrint HwndEx
Call 遍历窗口(HwndEx)
End If
Loop While HwndEx //为真则继续循环 HwndEx 为0则跳出循环 只能递归 1 层
End Sub
遍历窗口 03215684
按键精灵递归方式遍历窗口代码
最新推荐文章于 2024-05-10 12:23:59 发布