如我要在一个程式的输入框中输入一个4位的纯阿拉伯数字,需要从4个0开始试,我写了一个程式,用Timer做了一个延时,1千以下的还可以,但当试到1500左右以上时就好像死机了一样,好久都没反应,等反应过来了,没有效果,这是我写的源码,请各位提点一下是怎么回事:
For x = 0 To 9999
If Len(x) > 4
Then
for e = 4 - Len(x)
x = "0" & x
next
for i = 1 to 4
SendKeys "{backspace}"
next
SendKeys x
SendKeys "{ENTER}"
next
另外,当数字对了以后,怎么让程式停下来?假设验证码是3333,当试到3333后就让程式停下来,不再继续执行?
[
本帖最后由 appleuser 于 2009-10-13 03:44 编辑 ]