叫爷爷不叫就关机那程序谁有
答案:1 悬赏:10 手机版
解决时间 2021-06-05 09:53
- 提问者网友：無理詩人
- 2021-06-04 17:29
叫爷爷不叫就关机那程序谁有,,,最好做好给我，，
最佳答案
- 五星知识达人网友：詩光轨車
- 2021-06-04 18:10
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 30 -c ""说一二三四五，否则30秒倒数关机，不信可以试试看"" ",0 ,true
dim a
do while(a <> "一二三四五")
a = inputbox ("说一二三四五，快说""一二三四五"" ","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "不错吧"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，好玩么~~"
楼主改下想要的字就行了
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 30 -c ""说一二三四五，否则30秒倒数关机，不信可以试试看"" ",0 ,true
dim a
do while(a <> "一二三四五")
a = inputbox ("说一二三四五，快说""一二三四五"" ","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "不错吧"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，好玩么~~"
楼主改下想要的字就行了
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯