1、 for zh_zf裏的內容
2、增加壹個子程序:sub 執行(囊括所有執行內容)
具體修改如下:
1、
For zh_zf
hwnd = fg_zf(i)
TracePrint hwnd
hwnd = dm.FindWindowEx(hwnd, "Frame Tab", "")
hwnd = dm.FindWindowEx(hwnd, "TabWindowClass", "")
hwnd = dm.FindWindowEx(hwnd, "Shell DocObject View", "")
hwnd = dm.FindWindowEx(hwnd, "Internet Explorer_Server", "")
線程ID=BeginThread(執行) //將該子程序內容用多線程來執行即可實現,同時多窗口操作了
delay 3000 //加上適當延時,防止多線程卡住
i=i+1
Next
2、
Sub 執行
Call q
Call w
Delay 100
Call e
Delay 100
Call r
Delay 100
Call t
Delay 100
Call y
Delay 100
Call u
End Sub