flying-bear@iced-hill
h雪山飞熊的英文翻译如何?
汗,写错了
[ 本帖最后由 wode998 于 2008-6-12 14:28 编辑 ] 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) + "哈哈哈哈,晓得我的厉害老不??" 二楼内容用记事本保存成“真言.vbe”,然后运行!
回复 3# 的帖子
不搞:@ 原帖由 飞狼 于 2008-6-12 14:25 发表 http://www.jgwy.net/images/common/back.gif二楼内容用记事本保存成“真言.vbe”,然后运行!
日你! ;P 原帖由 飞狼 于 2008-6-12 14:22 发表 http://www.jgwy.net/images/common/back.gif
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) + "哈哈哈哈,晓得我的厉害老不??"
VBE ;P
页:
[1]