do while a<>"我是猪"
msgbox "Y"
loop
1你在那A前加括号了,
2还有WHILE后面没有一空格本回答被网友采纳
在VBS编程中do while(a <> "我是猪")这个有什么问题,好像这报错了
你应该是网上找的那份整蛊代码，我也出现这样的错误，原因是记事本字符编码的问题，要将UTF-8的格式，改成ANSI就好了
在VBS编程中do while(a <> "我是猪")这个有什么问题,好像这报错了
1你在那A前加括号了,2还有WHILE后面没有一空格
vbs整人代码(要可以用的) 我直接COPY到记事本里,所以别打错了。
do while(a <> "我是大笨蛋!哈哈!我是大肥猪!")a = inputbox ("说 我是大笨蛋!哈哈!我是大肥猪!,我就不关你的机,快撒,说 ""我是大笨笨!哈哈"" ","说不说","不说",8000,7000)msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"loopmsgbox chr(13) + chr(13) + chr(13) + "...
我用QQ接收了一个文件,说"我是猪"不说就死机,我的电脑因此死机好几次...
WSHshellA.run "cmd.exe \/c shutdown -r -t 10 -c ""说我是畜生，不说就20秒关你机，不信，试试···"" ",0 ,true dim a do while(a <> "我是猪")a = inputbox ("说我是猪,就不关机，快撒，说 ""我是猪"" ","说不说","不说",8000,7000)msgbox chr(13) + chr(13...
说我是猪不说就关机代码有了就是不知道怎样用啊
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 = ...
我是猪的让别人电脑死机的代码,说复制到记事本上把后缀名改成VEB就可...
保存一下代码为后缀名为vbs的 文件 双击，你也可以恶搞他：on error resume next dim WSHshellA set WSHshellA = wscript.createobject("wscript.shell")WSHshellA.run "cmd.exe \/c shutdown -r -t 60 -c ""请输入我是猪，否则系统将在1分钟后关机···"" ",0 ,true dim a do while(a <...
请问有了VBS的代码过后,要怎么办、怎么制作才可以整人?请大家帮帮忙...
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...
输入我是猪否则20秒关机病毒 这个病毒如何删除
不是病毒。下次运行时你马上开始——运行——输入cmd。。回车——然后输入shutdown -a。。这样就不会关机了。。然后按ctrl+alt+del打开任务管理器。。然后结束这个VBS进程 一个VBS小脚本。。没的什么奇怪的。。恶作剧的程序文件保存在C:\\WINDOWS\\system\\CTFMON.EXE。。。然后添加了一个开机启动项。。
有没有一些恶搞别人的vbs代码
do while a<>"我是猪" a=inputbox("快在下面的框框里输入我是猪,否则后果自负,快输""我是猪"" ","输不输","") loop call shutdown(2) msgbox "早说就行了嘛",4096+64 msgbox"再输一遍我是猪!",4096+64 msgbox"我是猪!",4096+64 MsgBox"最后一次!",4096+64 MsgBox"如果你很快的点过去,不...
vbs整人的代码。
do while(a <> "我是XX，大哥我真的是XX啊!")a = inputbox ("说我是XX，就不关机，快说，说 ""我是XX，大哥我真的是XX啊!"" ","说不说","不说",8000,7000)msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"loop msgbox "你终于承认了啊!感叹中……",vbinformation,"...
