不需要任何编程基础，不需要任何编程软件，只需使用电脑里自带的记事本软件就可以轻松编写出整人的小程序，甚至是病毒。

首先，单击右键，新建一个文本文档，输入：msgbox"你是猪！"
然后，点击文件->另存为->保存类型：所有文件->文件名xxxx.vbs，名字随便起，但一定要记得把后缀名改为 .vbs。

然后打开刚保存的xxxx.vbs
哈哈，很好玩吧，双引号里的内容”你是猪！”可以随意更改，但双引号一定要用英文输入法来写。

嗯，下面正式开始整人。

按照前面说的，在记事本上输入如下图，并保存为55.vbs。

其中wscript.Sleep 500为停留500毫秒，可随便更改
下面这段代码就是一个启动关机程序的东东，300这个数是指300秒倒计时，这个数字也可以随便改，这段代码也可以独立保存出来作为一个关机程序
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.Run "cmd.exe /c shutdown -s -t 300"
打开这个文件，如果你点击“是”，你就会进入一个死循环中，就是不断地弹出对话框。

解决方法是按下Alt+Ctrl+Delete键，选择“进程”，把wscript.exe结束掉。

如果点击“否”，
则进入关机倒计时，解决方法是点击“开始”->“运行”,在对话框里输入shutdown -a ,再点击“确定”即可。

最后嘛，把这文件创建桌面快捷方式，然后把图标换了，换成QQ什么的，你懂的，呵呵。

当然，这种VBS编程还有很多好玩的地方，比如病毒，我也收藏有几个，由于我是一等一的良好市民，就不写上来了。

最后再送上一个程序：
dim a
do
a=inputbox("输入123，否则关机。

")
if a="123" then
msgbox" 很遗憾，你中招了，这是整人程序，你就等着关机吧"
WSHshell.Run "cmd.exe /c shutdown -s -t 300"
wscript.sleep 1000
exit do
else
msgbox"乖点，输入123"
end if
loop。