整人代码 (vbs恶搞整人代码)

-->

首先，创建一个文本文档，它是记事本txt格式的。

只需复制以下代码并保存即可。

Msgbox("这个代码表明你想说什么")

其他的可以不用管cript>cript>cript>cript>其他的可以忽略。

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:// . 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

结束选择

末端接头

均线图基础知识