谁知道 这是什么 怎么写 帮下忙 我没分了 .on error resume nextdim WSHshellAset WSHshellA = wscript.createobject("wscript.shell")WSHshellA.run "cmd.exe /c shutdown -s -t 15 -c ""说我爱你,不说我爱你就15秒关你机,不信
来源:学生作业学帮网 编辑:学帮网 时间:2024/06/03 15:05:01
谁知道 这是什么 怎么写 帮下忙 我没分了 .
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) + "哈哈哈哈,爱就是爱嘛!"
这是一个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字我喜欢这篇作文怎么写,
蔫这个字怎么读?最好把意思写出来!我现在没分了,要不.
谁知道这作文怎么写
谁知道这题怎么写?
谁知道这题怎么写
谁知道这题怎么写?