怎样实现同一个VBS里循环2种按键命令？

wx8053856

先向各位大大致敬
如下 我有一个这个的脚本

Dim wshshell
Set wshshell = WSCRIPT.createobject("wscript.shell")
wshshell.appactivate "程序名"
while true
wscript.sleep 2000
wshshell.sendkeys "1"
wscript.sleep 2000
wshshell.sendkeys "2"
wscript.sleep 2000
wshshell.sendkeys "1"
wscript.sleep 2000
wshshell.sendkeys "2"
wend
复制代码

抱歉因为是初学者
1) 想知道 上面的代码 可否让这个 每2秒的1 2 1 2 可以用代码写成 执行2次或N次吗 因为平时都是复制粘贴很多 因为循环到一定时间又出了新的问题
2) 那么新的问题就是
在上面的命令 循环到N次 或者N分钟/小时的时候 在不停止这个循环的情况下
加上这个 按键3 4

wscript.sleep 60000
wshshell.sendkeys "3"  
wscript.sleep 60000
wshshell.sendkeys "4"
复制代码

不知是否可行 意思就是说 在 一直循环下去的12过程中 循环到一定时间或次数 开始循环3 4  同时循环1 2 命令和 34的命令 请问各位大大可否实现

wx8053856

.....因為一些程序 ..需要按鍵循環..
誒 好像發的太早了

qq506657335

vbs脚本感觉有点麻烦。。。vb就简单多了。。直接timer就好了。。

for i=1 to n                     'n表示要循环的次数
  wscript.sleep 2000
  wshshell.sendkeys "1"
  wscript.sleep 2000
  wshshell.sendkeys "2"
next
for a=1 to n
  wscript.sleep 2000
  wshshell.sendkeys "1"
  wscript.sleep 2000
  wshshell.sendkeys "2"
  wscript.sleep 60000
  wshshell.sendkeys "3"  
  wscript.sleep 60000
  wshshell.sendkeys "4"
next
复制代码