求高手帮我写个简单的vbs程序

vbs程序想要keydown和keyup分开来发送比较困难，一般来说，是用sendkeys发送咐闹按键一次的效果(即键按下到d起的过程）。如果想要达到这个功能，要调用sendmessage、要知道窗口句柄，既然这李段样，还不如直接用按键精灵写脚本。

以下是sendkeys模拟按键的示例。

set WshShell = WScript.CreateObject("WScript.Shell"哪简誉)

wscript.sleep(1000)

WshShell.SendKeys "{UP}"

wscript.sleep(1000)

WshShell.SendKeys "{ENTER}"

wscript.sleep(1000)

WshShell.SendKeys "1"

wscript.sleep(1000)

WshShell.SendKeys "n"

wscript.sleep(1000)

====================

这个是vbs写的，以1秒间隔按键。如果不要间隔。删除sleep那些行。

1、首先在电脑鼠标右键 新建一个文本文档。

2、然后点开文本文档进行编辑，最重要的一个代码就是msgbox，然后在后面添加想要说的话，但是要使用英文标点符号，换行时候都需要在前面加上代码，最后保存。

3、保存好之后，对这个文本文档进行重命名更改后缀，把文本文档的txt改成vbs。

4、改vbs后缀会d出一个提示框，提示你如果改变文件扩展名，可能会导致文件不可用誉铅春，确定要改吗，点击是。

5、确定更改激轮文件扩展名之后文本文档就会变成vbs，这样就表示已经完成制作。

6、只要双击这个vbs，桌面就会d出你庆耐所编辑的语言，一直点击确定就会出现你编辑的所有内容。

---