模拟按键输入大小写都能模拟输入

.如果 (取文本左边 (按键 [键位], 2) ＝ “小”)
.如果真 (虚拟键状态_ (#CapsLock键) ＝ 1)
模拟按键 (#CapsLock键, , )
.如果真结束
模拟按键 (到整数 (取文本右边 (按键 [键位], 取文本长度 (按键 [键位]) － 2)), , )
.否则
.如果 (取文本左边 (按键 [键位], 2) ＝ “大”)
.如果真 (虚拟键状态_ (#CapsLock键) ≠ 1)
模拟按键 (#CapsLock键, , )
.如果真结束
模拟按键 (到整数 (取文本右边 (按键 [键位], 取文本长度 (按键 [键位]) － 2)), , )
.否则
.如果 (取文本左边 (按键 [键位], 2) ＝ “有”)
模拟按键 (#Shift键, 到整数 (取文本右边 (按键 [键位], 取文本长度 (按键 [键位]) － 2)), )
.否则
.如果 (取文本左边 (按键 [键位], 2) ＝ “无”)
模拟按键 (到整数 (取文本右边 (按键 [键位], 取文本长度 (按键 [键位]) － 2)), , )
.否则

.DLL命令 虚拟键状态_, 整数型, "user32", "GetKeyState", , （开关键包括CapsLock， ; NumLock，ScrollLock）；如某个键当时正处于按下状态，则位15为1；如已经抬起，则为0
.参数 nVirtKey, 整数型, , 欲测试的虚拟键键码。对字母、数字字符（A-Z、a-z、0-9），用它们实际的ASCII值;

.DLL命令 模拟键盘行动_, 整数型, "user32.dll", "keybd_event", , 这个函数模拟了键盘行动
.参数 键代码, 整数型, , bVk,欲模拟的虚拟键码
.参数 键扫描码, 整数型, , bScan,键的OEM扫描码
.参数 标志值, 整数型, , dwFlags,标志常数
.参数 特定值, 整数型, , dwExtraInfo,通常不用的一个值