Question

按键精灵 按键的时间间隔设置

1-9 的数字 其中 我12345 这5个键各1秒1次 6 需要30秒 7需要60秒 8需要8秒 请问怎么设置呢

Answer 1

Dim ss(8)
s = split("1,1,1,1,1,30,60,8,1", ",")
For i = 0 To 8
    ss(i) = now
Next
Do
    For i = 0 To 8
        If DateDiff("s" , ss(i) , now) >= int(s(i)) Then 
            ss(i) = now
            KeyPress asc(i+1),1
        End If
    Next
    Delay 500
Loop