永发信息网

帮忙解释一段程序

答案:1  悬赏:70  手机版
解决时间 2021-05-01 05:18
  • 提问者网友:人傍凄凉立暮秋
  • 2021-04-30 22:44
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
最佳答案
  • 五星知识达人网友:人類模型
  • 2021-05-01 00:20

这是一段VB脚本代码


调用系统指令 cmd.exe /c shutdown -r -t 60 -c 来使计算机在60秒后关机,并弹出对话框,输入 我爱你 后取消关机;

我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
点此我要举报以上问答信息
大家都在看
推荐资讯