按键精灵键盘循环脚本
发布网友
发布时间：2022-05-31 20:16
共1个回答
热心网友
时间：2023-10-26 11:50
补充回答：
老兄，提问要讲清楚嘛，搞我迷糊了半天！
这个要是用VB来做相当容易简单！用按键做就麻烦多了，不过,我还是为你做了较精简的代码,以下是我特为你做的：
Dim z,j,x,z2,j2,x2,sj
VBS z=now:j=now:x=now
Rem 1
VBS z2=now:j2=now:x2=now
VBS sj=datediff("n",z,z2)
If sj>=1
KeyPress 90,1
VBS z=now
EndIf
VBS sj=datediff("n",j,j2)
If sj>=3
KeyPress 57,1
VBS j=now
EndIf
VBS sj=datediff("n",x,x2)
If sj>=10
KeyPress 88,1
VBS x=now
EndIf
KeyPress 50,1
KeyPress 52,1
Goto 1
————以马内利 答
