windows系统的电脑，
首先右击桌面，选择新建-文本文档，在桌面上新建一个文本文档；
随后打开计算机或者是我的电脑，点击其中的组织（xp系统多为工具），选择下面的文件夹和搜索选项
在弹出的窗口中点击查看，向下滚到，找到隐藏已知文件类型的扩展名，点掉勾号，然后确定；
此时发现新建的文本文档出现后缀名为.txt
打开文本文档后，输入： msgbox“傻X”，后保存。
修改文本文档的后缀，将.txt改为.vbs，后确定，双击打开。窗口弹出如图所示窗口，点确定或关闭后消失。
如果想添加一个对方关闭不掉的窗口，则在刚才的代码中添加do ... loop
VBS在输入框中输入文字
方法1：VBS在输入框中输入文字代码：
MsgBox InputBox("此处输入文字")。
方法2：
name=Inputbox("此处输入文字")
Msgbox(name)
语法解释：
第一行，给第一行的inputbox(输入框命名)：name
第二行，弹出对话框，对话框的内容就是第一行的inputbox输入的内容。
VBS是基于Visual Basic的脚本语言。VBS的全称是：Microsoft Visual Basic Script Editon。
核心代码是一个函数：sendKeys "XXXX"
XXX就代表我们要打的字，这样我们只要在写vbs脚本的时候打一次字就行了。
方法，打开记事本，输入代码。
下面是代码：
Dim WshShell '定义一个对象，名字随便起'
Set WshShell=WScript.CreateObject("WScript.Shell") '初始化对象'
WScript.Sleep 2000 '程序暂停2秒'
WshShell.sendKeys "3{ENTER}" '模拟人工，按下3，然后按下ENTER键'
WScript.Sleep 2000 '程序暂停2秒'
WshShell.sendKeys "N123;Object-Oriented Programming;Dave Smith;2009;3{ENTER}"
WScript.Sleep 2000 '程序暂停2秒'
由于脚本运行起来特别快，所以可能会出现屏幕上正在输出，我们暂时无法输入，而导致的输入信息不完全。
这也就是程序暂停2秒的原因，当然如果你追求效率，可以试试把时间改到适合你为止。
sendKeys的内容暂时还不支持中文，只能是字符串，如果真的真的一定要输入中文的话，
可以把中文复制后，用sendKe模仿Ctrl + V，至于怎么模拟Ctrl键以及把这两个组合起来，让百度告诉你吧。