你可以把这段代码写入你的脚本中while1加入你的脚本endwhile这是一个死循环命令,既只要使用者不按停止键脚本就晕一直运行
Dim 数值Dim 次数Dim ADim BA = 0B = 5数值 = Form1.InputBox1.Text次数 = Form1.InputBox2.TextDo While A < INT(次数)SayString 数值A = A+1Loop
重新检查一下 看看那里写错了