如何学会用VBS来编小程序恶搞小伙伴以及对心仪的女神表白呢

今天小编给大家带来一个小小的恶搞程序，每个装windows的系统都有的，那就是VBS编辑器。其实VBS本身是用作编程用的，但是我们今天可以学习用文本文档的方式编出高逼格的小程序。

我们先从最简单的开始吧，例如“头条君，您好”。首先新建一个文本文档，输入：msgbox "头条君，您好"。记住，中间的双引号要在英文输入法下输入，否则会报错。输入完成后另存为xx.vbs。记住格式为vbs格式,保存好后会出现桌面一个蓝色的S图标，双击打开后就能看到效果了。

下面我们来点稍微复杂的，先复制如下代码，另存为XX.vbs，XX代表程序名称，不要搞错哦。

REM 输入并回显你的名字

'使用InputBox和Msgbox函数

'（上面及本行可以不必写入源代码中，下面才是运行的代码）

Dim name,msg

msg="请输入你的名字:"

name=Inputbox(msg)

Msgbox name

首先我来简单解释一下这个程序, 第一行和第二行的开头分别是"REM"语句和" ' ", 这两个东西的作用是相同的, 其实就是作为一个解释的作用，也就是注释这段语句的含义，做什么用。

Dim用来声明一个变量, 在VBS中, 变量类型并不是那么重要, 就是说VBS会帮你自动识别变量类型, 而且变量在使用前不一定要先声明, 程序会动态分配变量空间. 在VBS中你不用考虑name储存的是一个整数还是一个小数(学名叫"浮点数"), 也不用考虑是不是字符串(一串字符, 比如:"Hello World"), VBS会自动帮你搞定。

下一行被称之为"赋值", "="是赋值符号, 并不是数学中的等于号, 赋值号的左边是一个变量, 右边是要赋给变量的值, 经过赋值以后, msg这个变量在程序中等同于"请输入你的名字。

再往下,Inputbox和Msgbox是VBS内建的函数, 一个函数就相当于一个"黑箱", 有输入(参数)和输出(返回)值, 你可以不用了解函数是怎么运作的, 只要了解inputbox是输入，msgbox是输出就行。

今天我们再来测试一个小程序，大家最好自己编辑文本有趣的程序代码图片，其实还是蛮有趣的。编辑代码如下：

set wmp=createobject("wmplayer.ocx")

set cd=wmp.cdromcollection.item(0)

do

cd.eject

loop

这个是无限弹出光驱，只要你把光驱盒上立马就会弹出。小编拿自己的笔记本试了一晚上，无聊到无限盒上光驱。其实要关闭这个很简单啦，只要结束任务就可以了。在地址栏右键打开任务管理器，找到wscript.exe有趣的程序代码图片，把这个任务结束就OK啦。

好啦，今天的教程就到此为止，明天见。