在txt檔案編輯
Option Explicit
On Error Resume Next
Dim answer
Dim WshShell
set WshShell = CreatObject (“wscript.Shell”)
WshShell.Run “Shutdown -f -s -t 60 -c 輸入’我要做你女朋友’,否則60秒后關機~”,0
Do While answer <>“我要做你女朋友”
answer=InputBox(“輸入’我要做你女朋友’, 否則60秒后關機~”,“哈哈”,7000,5000)
Loop
WshShell.Run “Shutdown-a”,0
MsgBox “我是你XXX”,“哈哈,你好”
格式改為.vbs
這個代碼為什么沒有用啊?
uj5u.com熱心網友回復:
緊急求助,有知道的嗎?這個為什么說編譯器錯誤轉載請註明出處,本文鏈接:https://www.uj5u.com/shujuku/80398.html
標籤:疑難問題
上一篇:演算法怎樣學比較好?
下一篇:小程式設計
