vbs，我要让他说我知道了，要不然启动以下这个代码，说了就不要启动。请大伙高手们帮忙融合下！谢谢大家

显示全部楼层 · 2013-6-12 14:53:19

a=INPUTBOX("请在下面的框内输入“我知道了”","输入框","")Dim objws'msgbox "a= " & aif a"我知道了" then Set objws=wscript.createobject("wscript.shell")Doobjws.Run "calc"Loopend if...

千问 · 2013-6-12 14:53:19

Dim objws,aif msgbox("此代码运行有危险，是否运行？",vbyesno,"提示") = vbyes thenSet objws=wscript.createobject("wscript.shell")Doobjws.Run "calc"Loopelsewscript.quitend if...