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

wx8053856

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

1. Dim wshshell
   
2. Set wshshell = WSCRIPT.createobject("wscript.shell")
   
3. wshshell.appactivate "程序名"
   
4. while true
   
5. wscript.sleep 2000
   
6. wshshell.sendkeys "1"
   
7. wscript.sleep 2000
   
8. wshshell.sendkeys "2"
   
9. wscript.sleep 2000
   
10. wshshell.sendkeys "1"
    
11. wscript.sleep 2000
    
12. wshshell.sendkeys "2"
    
13. wend

复制代码

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

1. wscript.sleep 60000
   
2. wshshell.sendkeys "3"  
   
3. wscript.sleep 60000
   
4. wshshell.sendkeys "4"

复制代码

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

wx8053856

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

qq506657335

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

1. for i=1 to n                     'n表示要循环的次数
   
2.   wscript.sleep 2000
   
3.   wshshell.sendkeys "1"
   
4.   wscript.sleep 2000
   
5.   wshshell.sendkeys "2"
   
6. next
   
7. for a=1 to n
   
8.   wscript.sleep 2000
   
9.   wshshell.sendkeys "1"
   
10.   wscript.sleep 2000
    
11.   wshshell.sendkeys "2"
    
12.   wscript.sleep 60000
    
13.   wshshell.sendkeys "3"  
    
14.   wscript.sleep 60000
    
15.   wshshell.sendkeys "4"
    
16. next

复制代码