有时键盘上的几个键坏了，而这几个键又不很常用（像主键盘上6、7、8这几个键，我好像从来没用过），就不想换键盘。可是有时要输入这些符号，又要打开软键盘，很麻烦。
其实有一个方法可以输入任意字符：Alt键 + 字符的Ascii码。
这个方法适用于输入任何字符。如：按Alt键 + 128就可以输入欧元的符号?，Alt键 + 38输入&。
这里要说明一下：Alt + 128是指按住Alt键不放，再依次按下数字键盘上的1、2、8三个键。
可是，怎样获取字符的Ascii码呢？
在记事本中输入以下代码：
Do a = InputBox("输入字符，查询ASCII码", "ASCII码速查") If a = "" Then Exit Do Else MsgBox Asc(a),, "ASCII码速查" Loop
保存时，文件类型选择“所有文件”，文件名输入Asc.vbs。
现在双击试试。
我的键盘上面一排6、7、8、9、0、都坏了，输入^、&、*、(、)【就是67890上档的那些符号】的时候都是用这个办法输的。
后记：这个例子中用到的.vbs文件是Visual Basic脚本文件。Visual Basic脚本是简单的Visual Basic代码，在Windows操作系统中由wscript.exe解析翻译，可以实现Visual Basic的部分功能。
转自Bill Lee 博客
