第1个回答 2007-06-20
VBSCall a=InputBox("输入开始数字")
VBSCall b=InputBox("输入结束数字")
If a>b
Goto 1
Else
Goto 2
EndIf
Rem 1
For a-b+1
//你需要把下面的回车换成你需要换页的操作,不会就录制
KeyPress 13,1
SayString a
a=a-1
EndFor
Rem 2
For b-a+1
//你需要把下面的回车换成你需要换页的操作,不会就录制
KeyPress 13,1
SayString a
a=a+1
EndFor