首先，创建一个文本文档，它是记事本txt格式的。
只需复制以下代码并保存即可。
Msgbox("这个代码表明你想说什么")
其他的可以不用管 其他的可以忽略。
set ws = createobject(" wscript . shell ")
呼叫关机(1)
在a & lt& gt“我是哈马皮”
A=inputbox("在下面的框里输入我的名字，否则后果自负，输得很快""我是哈尔滨批" "输了还是输了"，"输了"
环
呼叫关机(2)
Msgbox“就这么告诉我”，4096+64
Msgbox“又输了，我是哈马皮！”,4096+64
Msgbox“我是哈马皮！”,4096+64
Msgbox“最后一次！”,4096+64
MsgBox“想多了怎么可能！”,4096+64
MsgBox“如果你很快点击那里并且不看”，4096+64
MsgBox“我要你踩我空的房间！哼！”,4096+64
MsgBox“从前有座山！”,4096+64
MsgBox“山里有座庙。”, 4096+64
MsgBox“寺庙里有一个老和尚在讲故事。”, 4096+64
ws . run " ie xplore . exe http://www . Baidu . com "
Msgbox“哎呀，我累了！数羊哄我睡觉”，4096+64
对于i=1到100
MsgBox i & amp《一只羊》，4096+64
然后
Msgbox“哦，看你可怜。这次我饶了你。下次注意！”,4096+64
Msgbox“最后一个问题，我是你的男神吗！”,4096+64
Inputbox("是"、"请选择"、"是")
呼叫关机(1)
如果…就会结束
次级关闭
选择案例s
案例1
ws . run " cmd . exe/c shut down-r-t60-c "，0
案例2
ws.run"cmd.exe /c shutdown -a "，0
结束选择
末端接头
均线图基础知识