想无聊整蛊朋友吗?那就学一学vbs吧。但是要注意,害人之心不可有,防人之心不可无。
工具/原料
一台电脑
方法/步骤
1、新建一个文本文档
2、打开文档
3、输入代码,代码如下=======分割线=======onerrorr娣定撰钠esumenextdimWSHs茑霁酌绡hellAsetWSHshellA=wscript.createobject("wscript.shell")WSHshellA.run"cmd.exe/cshutdown-r-t120-c""说我是猪,不说我是猪就两分钟关你机,不信,你试试···""",0,truedimadowhile(a<>"我是猪")a=inputbox("说我是猪,就不关机,说""我是猪"" ","说不说","你写啊",8000,7000)msgboxchr(13)+chr(13)+chr(13)+a,0,"MsgBox"loopmsgboxchr(13)+chr(13)+chr(13)+"早说就行了嘛,呵呵,爽"dimWSHshellsetWSHshell=wscript.createobject("wscript.shell")WSHshell.run"cmd.exe/cshutdown-a",0,truemsgboxchr(13)+chr(13)+chr(13)+"哈哈哈哈,真过瘾"WScript.Echo("喜欢吗,快点点赞(YY)")a=inputbox("赞不赞,说赞就解除,不说就不解""赞"" ","赞不赞","赞吗",8000,7000)msgboxchr(13)+chr(13)+chr(13)+a,0,"MsgBox"loopdomsgboxchr(13)+chr(13)+chr(13)+"呵呵,爽死了"
4、下面一步要仔细听把它另存为
5、然后把它的后缀名改成.vbs
6、然后把文件类型改成所有
7、然后保存
8、这时你就会看到保存的地方新增了一个文件(图标像卷纸)
9、这时你只要双击,就可以看到你的vbs文件运行了,也就是说你已经成功创作!!!