开始吧,
第一个,我是猪
首先在电脑上新建一个TXT文档
然后把下面这段代码输入进去
On Error Resume Next
Dim WSHshellA
Set WSHshellA = wscript.CreateObject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -s -t 90 -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) + "早说就行了嘛!好,不关了"
WSHshella.run "cmd.exe /c shutdown -a"
然后保存
然后把这个文本文档的后缀改为vbs 也就是说新建的文本文档本来是.TXT的后缀,
你要修改为.VBS的后缀
双击打开之后系统将会弹出对话框
提示电脑将在一分钟之后关机
然后有一个对话框要你自己说:我是猪
如果不说电脑将一分钟后关机
如果输别的,是没用的。
它会不停的提示你承认
我是猪
直到电脑关机
这是个不错的恶搞软件,对电脑没有危害,大家不妨试下吧。