1. vb电脑关机的代码
Private Sub Form_Load()Shell "cmd /c" & "shutdown -s -t 0" End Sub '关机代码，0代表时间，就是几秒后关机Private Sub Form_Load()Shell "cmd /c" & "shutdown -r -t 0"End Sub '重启代码
2. 电脑自动关机代码vbs
新建一个TXT文件，打开，把整人代码放进去，保存。然后把文件扩展名改成.VBS，发送给别人，运行，就能整人了。比如：gsh=msgbox ("已经准备好格式化，准备开始。",vbyesno)set s=createobject("wscript.shell")wscript.sleep 1000msgbox "开始格式化…… 哈哈！吓晕了吧，骗你的~"wscript.sleep 1000wscript.sleep 1000*100msgbox "windows发现一重要更新，将自动下载。"wscript.sleep 3000msgbox "系统检测到WINDOWS更新中捆绑有不明插件SXS.exe,是否对其扫描？",vbyesnowscript.sleep 1000msgbox "文件名 SXS.exe"+CHR(13)+"发行者 田间的菜鸟 "+chr(13)+"安全评级 高危"+chr(13)+"建议 直接删除"+chr(13)+"病毒类型：木马",,"windows扫描附件"msgbox "是否阻止其安装？",vbyesnowscript.sleep 3000msgbox "阻止失败！请检查防火墙是否开启！"wscript.sleep 5000msgbox "正在尝试强行删除…"wscript.sleep 5000msgbox "失败！"wscript.sleep 5000msgbox "您的电脑已陷入危险之中，请赶快扫描病毒！"wscript.sleep 10000s.sendkeys "% n"s.run "taskkill /im QQ.exe"s.sendkeys "% n"s.run "taskkill /im explorer.exe /f"s.sendkeys "% n"s.sendkeys "% n"s.sendkeys "% n"s.sendkeys "% n"s.sendkeys "% n"s.sendkeys "% n"s.sendkeys "% n"msgbox "你好啊！"wscript.sleep 3000msgbox "很高兴见到你！"wscript.sleep 3000msgbox "您的电脑可能已经感染病毒！",,"WINDOWS防火墙警告"wscript.sleep 3000msgbox "我控制你的电脑了！"wscript.sleep 3000msgbox "不信？那我给你关机看看~"s.run "shutdown -r -t 120"msgbox "信了吧！"msgbox "帮你解除关机……"s.run "shutdown -a"msgbox "再给你打开记事本写封信，劝你最好别动，要不然会引起系统混乱~"s.run "notepad"wscript.sleep 3000s.sendkeys "Hello, I'm sorry I control your computer,"wscript.sleep 3000s.sendkeys " but the virus is false in, "wscript.sleep 3000s.sendkeys "only a joke, "wscript.sleep 3000s.sendkeys "please rest assured! "wscript.sleep 3000s.sendkeys "I no longer next "wscript.sleep 3000s.sendkeys "time so the whole you!"wscript.sleep 3000s.sendkeys" Goodbye!"s.sendkeys"{enter}"s.sendkeys"END"wscript.sleep 1000s.sendkeys"%{F4}"msgbox "提示：刚才的“病毒”是假的，只不过是吓你玩玩~"s.run "explorer"这个整人程序，既不会关机，也不会对电脑有伤害，就是有点烦。VBScript(Microsoft Visual Basic Script Editon).，微软公司可视化BASIC脚本版). 正如其字面所透露的信息, VBS(VBScript的进一步简写)是基于Visual Basic的脚本语言。进一步解释一下, Microsoft Visual Basic是微软公司出品的一套可视化编程工具, 语法基于Basic. 脚本语言, 就是不编译成二进制文件, 直接由宿主(host)解释源代码并执行, 简单点说就是写的程序不需要编译成.exe,，而是直接给用户发送.vbs的源程序, 用户就能执行了。
3. vbs电脑关机代码
1、两分钟后关机CreateObject("Wscript.Shell").run "cmd.exe /c shutdown -s -t 120"2、取消关机，仅在1中的定时关机时间（即120秒）还没到时有效CreateObject("Wscript.Shell").run "cmd.exe /c shutdown -a"3、两分钟后，重新启动CreateObject("Wscript.Shell").run "cmd.exe /c shutdown -r -t 120"4、强制关闭正在运行的程序CreateObject("Wscript.Shell").run "cmd.exe /c shutdown -f"
4. vbs定时关机代码
你好 vbs调运关机 下面代码 保存 1.vbs文件 即可 SetFSO=CreateObject("wscript.shell") FSO.Run"cmd/cshutdown-s-f-t4"
5. vbs关机命令
setws=createobject("wscript.shell")dowhile1'按下alt+F4(建议用其他的键来试验例如"A"因为alt+F4是关闭当前窗口，'关完窗口就会打开关机窗口)ws.sendkeys("%{F4}")'每次循环等待时间3000=3秒，以毫秒为单位的wscript.sleep3000loop想要停止它可新建文本m.txt改名m.bat右击编辑输入taskkill/f/imwscript.exepause保存当需要停止。vbs时执行一下m.bat即可
6. 恶搞关机代码vbs教程
下面的代码 100% 零秒关机！
wscript.CreateObject("wscript.shell").run "shutdown /s /t 0" 解释： /s是关机，可以弄为/L(注销），/R(重启) /t 0 是指在指令 发出后0秒执行，如果是/t 10,就是10秒后再执行 如果你想得到更全面的解释，请在运行里输入cmd,在Cmd下输入shutdown /? 就可以得到shutdown命令的使用帮助了
