Rem 〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓★说★明★〓〓〓〓〓〓〓〓〓〓〓〓〓☆〓 Rem 【功能说明】数字序列号输出〖模板〗 Rem 【使用说明】在弹出的对话框中输入起始号码(最小数字)跟结束号码(最大数字) Rem 【提示说明】请在记事本中测试 Rem 〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓★定变量★〓〓〓〓〓〓〓〓〓〓〓〓〓☆〓 dim a,b Rem 〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓★主程序★〓〓〓〓〓〓〓〓〓〓〓〓〓☆〓 Rem 〖脚本开始〗 VBSCall a=InputBox("输入起始号码") VBSCall b=InputBox("输入结束号码") Rem 〖这个cint(x)是把变量值转换成数字〗 a=cint(a) b=cint(b) While a<=b SayString a KeyPress 32,1 a=a+1 EndFor Rem 〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓★备★注★〓〓〓〓〓〓〓〓〓〓〓〓〓☆〓 Rem 【脚本经过修改】 Rem 【创作日期】2005 Rem 【数字记号】①②③④⑤⑥⑦⑧⑨⑩ Rem 〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓★结★束★〓〓〓〓〓〓〓〓〓〓〓〓〓☆〓