联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!
Set WshShell = WScript.CreateObject("WScript.Shell") intAnswer = MsgBox("【是】运行 a.bat" _ & vbCrLf & "【否】运行 b.bat" _ , vbQuestion + vbYesNoCancel, "选择") if intAnswer = vbYes Then WshShell.Run "a.bat" end if if intAnswer = vbNo Then WshShell.Run "b.bat" end if WScript.Quit