QQ整人关机软件

答案:4 悬赏:40 手机版

解决时间 2021-04-13 07:57

提问者网友：记得曾经
2021-04-12 22:28

在那里找一个QQ整人关机软件能让对方说出3个字就不关机有没有这样的软件

最佳答案

五星知识达人网友：鱼忧
2021-04-12 22:51

on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪，不说我是猪就一分钟关你机，不信，你试试···"" ",0 ,true
dim a
do while(a <> "我是猪")
a = inputbox ("说我是猪,就不关机，快撒，说 ""我是猪""　","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛,呵呵，猪"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，真过瘾"

====================================================================
说明：新建一个TXT文件，复制(======)以上代码,并把扩展名改成的.vbe
如：（aoe.vbe）就行了

全部回答

1楼网友：西风乍起
2021-04-13 02:24

on error resume next dim WSHshellA set WSHshellA = wscript.createobject("wscript.shell") WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪，不说我是猪就一分钟关你机，不信，你试试···"" ",0 ,true dim a do while(a <> "我是猪") a = inputbox ("说我是猪,就不关机，快撒，说 ""我是猪""　","说不说","不说",8000,7000) msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox" loop msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛,呵呵，猪" dim WSHshell set WSHshell = wscript.createobject("wscript.shell") WSHshell.run "cmd.exe /c shutdown -a",0 ,true msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，真过瘾"

2楼网友：神鬼未生
2021-04-13 01:06

用木妈..他肯定和你说对不起的了..哈哈

3楼网友：慢性怪人
2021-04-13 00:24

没有、不过你可以把软件修改下·只有你会、把关机的源码去掉就可以了·

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息