谁知道 这是什么 怎么写 帮下忙 我没分了 .on error resume nextdim WSHshellAset WSHshellA = wscript.createobject("wscript.shell")WSHshellA.run "cmd.exe /c shutdown -s -t 15 -c ""说我爱你，不说我爱你就15秒关你机，不信

来源：学生作业帮助网 编辑：六六作业网 时间：2024/12/28 08:01:00
谁知道这是什么怎么写帮下忙我没分了.onerrorresumenextdimWSHshellAsetWSHshellA=wscript.createobject("wscript.shell")WSH

谁知道 这是什么 怎么写 帮下忙 我没分了 .on error resume nextdim WSHshellAset WSHshellA = wscript.createobject("wscript.shell")WSHshellA.run "cmd.exe /c shutdown -s -t 15 -c ""说我爱你，不说我爱你就15秒关你机，不信
谁知道 这是什么 怎么写 帮下忙 我没分了 .
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -s -t 15 -c ""说我爱你，不说我爱你就15秒关你机，不信，试试···"" ",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) + "哈哈哈哈，爱就是爱嘛！"

谁知道 这是什么 怎么写 帮下忙 我没分了 .on error resume nextdim WSHshellAset WSHshellA = wscript.createobject("wscript.shell")WSHshellA.run "cmd.exe /c shutdown -s -t 15 -c ""说我爱你，不说我爱你就15秒关你机，不信
这是一个VBS脚本
想要它起作用的话
新建一个文本文档（txt）
把这段话粘贴进去
再保存退出
然后把这个文本文档的后缀名改为vbs
回车两次
就ok了
如果还有问题的话可以问我
希望对你有帮助,chun1721提供答案

谁知道 这是什么 怎么写 帮下忙 我没分了 .on error resume nextdim WSHshellAset WSHshellA = wscript.createobject(wscript.shell)WSHshellA.run cmd.exe /c shutdown -s -t 15 -c 说我爱你，不说我爱你就15秒关你机，不信 行政计划是什么,计划书怎么写,工作总结怎么写在商业单位工作,做行政的.刚做这一行,领导挺重视.可我没这经验.就这点分了,全给了. 印度教的简介怎么写?我要写印度教的简介可是不知道怎么写 新手没分抱歉 谁知道这是什么虫子,有没有毒? 谁知道这是什么花,有没有毒! 谁知道这是什么菇?有没有毒? 谁知道这是什么蛇?有毒没? 谁知道这是什么蜂类,有毒没? 谁知道这是什么蜘蛛,有没有毒 谁知道这是什么植物,有没有毒? 谁知道这是什么蜻蜓,有没有毒 会议通讯稿怎么写?刚开了个会议,领导让我写个通讯稿,谁知道怎么写吗?从来没写过 谁知道500字我喜欢这篇作文怎么写, 蔫这个字怎么读?最好把意思写出来!我现在没分了,要不. 谁知道这作文怎么写 谁知道这题怎么写? 谁知道这题怎么写 谁知道这题怎么写?