czjt1234

vbYes = 6
vbNo = 7

你的代码没写点了 vbNo 后要退出程序
所以不管你点哪个都一样
那个 1.exe是什么？
如果点了 vbNo 要退出程序，就把 1.exe 改成 WScript.exe
或者在第六行插入一行 WScript.Quit()

czjt1234

WScript.exe
你拼写错误了

WScript.exe 是 vbs 的进程名

czjt1234

user_input = 0 + inputbox("设定运行次数:")
yesno = msgbox("如果输入数字非常大，则运行时间可能很长，确实要运行吗？", vbyesno, "警告")
if yesno = vbno then WScript.Quit()

jishu = 0
t = timer()
do until jishu = user_input 
    jishu = jishu + 1
loop
t1 = timer()
t2 = t1 - t
if t2 > 3 then
    tout = "输入的数字可能较大" & vbCrLf
else
    tout = "输入的数字可能较小" & vbCrLf
end if
msgbox tout & "消耗时间:" & t2 & "秒", vbokonly, "运行结果"
复制代码

win7x64测试通过