MBA智库

按键精灵 时间 延时循环 父子程序

 1 //执行3次A 1次B
 2 
 3 //Call chengxuA
 4 //
 5 //
 6 //Call chengxuA
 7 //
 8 //Call chengxuA
 9 //
10 //Call chengxuB
11 //
12 //Sub ChengxuA
13 //
14 //
15 //    MessageBox "你好我是a"
16 //    
17 //End Sub
18 //
19 //Sub ChengxuB
20 //    MessageBox "我是程序B"
21 //End Sub
22 
23 
24 
25 
26 //运行半小时后结束
27 
28 
29 //shijian = Now
30 //Do
31 //    LeftClick 1
32 //    Delay 100
33 //    If Now >= DateAdd("n", 30, CDate(shijian)) Then 
34 //        TracePrint "已经单击了半小时了,退出循环"
35 //        Exit Do 
36 //    End If
37 //    Delay 100
38 //Loop 
39 
40 //循环后延时   再来个大循环
41 
42 //Sub ChengxuA
43 //
44 //
45 //    MessageBox "你好我是a"
46 //    
47 //End Sub
48 //
49 //While True
50 //  For i = 1 To 3
51 //   MessageBox "3次后等一个钟"//这里写你的脚本
52 //   Call chengxuA
53 //   Call chengxuA
54 //   Call chengxuA
55 //  Next
56 //  Delay 3000   //延时1小时
57 //Wend

 

posted @ 2016-04-29 16:27  冷色008  阅读(2174)  评论(4编辑  收藏  举报