哈 哈 你那不好 表白不好
我写个给你表白吧~
------------------------------------------------------------------
文件名的 后面一定要是 .VBE 我想你应该知道! 我爱你.VBE
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
分 分 分
我不知道我回答的是否正确 我没仔细看
我要上学去了88888
如果有错误 在联系我~
温馨提示:内容为网友见解,仅供参考