武汉城市规划教大家自制一个整人的小程序

2021年1月12日发(作者：桂育鹏)
教大家自制一个整人的小程序
其实方法很简单
首先新建一个文本文档，打开复制下 面蓝色的代码，保存退出，然后重命名，名字可以随便
设越诱惑越好，注意一定要把后缀名txt改为v bs 如：祝福.vbs

说明：
如果别人不输我是猪的话就会一直点下去 点到你设定的数字
for i=1 to 100
从1到100
可以改成 其他的数字
点到最后会强制打开萝卜论坛的网页（你也可以改成你想要打开的网页）




set ws=createobject(
call shutdown(1)
do while a<>我是猪
a=inputbox(哈哈 ……快在下面的框框里输入我是猪,否则后果自负，快输我是猪输不
输
loop
call shutdown(2)
msgbox 早说就行了嘛
msgbox再输一遍我是猪!
msgbox我是猪!
MsgBox最后一次!
MsgBox如果你很快的点过去,不看的话
MsgBox我就要你踩我空间的!哼!
MsgBox从前有座山!
MsgBox山里有个庙.
MsgBox庙里有个老和尚在讲故事.

msgbox哎呀累了！数绵羊哄我睡觉
for i=1 to 100
MsgBox i&只绵羊
next
msgbox哎呀我困了，这次就饶过你吧，下次注意哦!
msgbox最后问个问题，我是不是大好人！
if inputbox(是不是请选择是是
call shutdown(1)
end if
sub shutdown(s)
select case s
case 1

case 2

end select
end sub