按键精灵。。求做一个每1秒刷新一次页面直到按F8后停止并继续执行后面...
发布网友
发布时间:2024-09-29 11:48
我来回答
共1个回答
热心网友
时间:2024-09-29 13:34
Call 功能()
Global 线程ID
线程ID = BeginThread(功能)
PauseThread 线程ID
ContinueThread 线程ID
StopThread 线程ID
Sub 功能()
Do
KeyPress "F5", 1
Delay 1000
a = GetLastKey()
If a = 119 Then
Exit Do
End If
Loop
Goto X,Y
LeftClick 1
Delay 500
KeyPress "Tab", 2
SayString "20000"
KeyPress "Tab", 2
End Sub