我要用VB模拟一个脚本

来源：百度知道 编辑：UC知道 时间：2024/07/12 06:59:34
就是 按1隔1秒按2 再隔一秒按3 然后再按1 这样1 2 3 循环。每隔1秒按1次
这个模拟要怎么写啊。谁会的帮我写下。还有 要告诉我 怎么启动和关闭。。。

....
用timer
Interval = 1000
i=1

Private Sub Timer1_Timer ()
...
模拟i
...
if (i = 3) then
i=1
else
i=i++
end if
End Sub

开启和关闭设置Enabled属性就可以了
当然也可以不用TIMER.用循环.

for i=1 to 3
用if来判断开关.
模拟i
用sleep等一秒.
next i

模拟输入嘛可以用PostMessage/keybd_event/SendInput/HOOK/直接读写键盘的硬件端口