.版本 2 .支持库 spec .子程序 __启动窗口_按下某键, 逻辑型 .参数 键代码, 整数型 .参数 功能键状态, 整数型 .局部变量 lpString, 文本型, , , 缓冲区 .局部变量 lParam, 整数型 lpString ＝ 取空白文本 (255) lParam ＝ MapVirtualKeyA (键代码, 0) GetKeyNameTextA (lParam × 65536, lpString, 取文本长度 (lpString)) ' 十六进制&H10000转到十进制=65536 调试输出 (lpString)