快捷键！！！
我表里有一个要输入的字段，有几个固定的值要输入（如姓名=张三；李四）一天要输入张三；李四几十遍，别的名不常有，
能不能把张三设置为F1李四设置为F2（或字母AB或数字12）按F1姓名字段就自动添加张三。
[解决办法]
*---VFP6.0 代码
*---TEXT1.KEYPRESS
LPARAMETERS nKeyCode, nShiftAltCtrl &&该行是原来就有的
DO CASE
CASE nKeyCode=-1 && F2键
THISFORM.TEXT1.VALUE="张三"
CASE nKeyCode=-2 && F3键
THISFORM.TEXT1.VALUE="李四"
ENDCASE
Lparameters nKeyCode, nShiftAltCtrl
Do Case
Case nKeyCode=28&& F1
Nodefault
Thisform.Caption="你按了 F1 键"
Case nKeyCode=-1&& F2
Nodefault
Thisform.Caption="你按了 F2 键"
Case nKeyCode=-2&& F3
Nodefault
Thisform.Caption="你按了 F3 键"
Case nKeyCode=-3&& F4
Nodefault
Thisform.Caption="你按了 F4 键"
Case nKeyCode=-4&& F5
Nodefault
Thisform.Caption="你按了 F5 键"
Case nKeyCode=-5&& F6
Nodefault
Thisform.Caption="你按了 F6 键"
Case nKeyCode=-6&& F7
Nodefault
Thisform.Caption="你按了 F7 键"
Case nKeyCode=-7&& F8
Nodefault
Thisform.Caption="你按了 F8 键"
Case nKeyCode=-8&& F9
Nodefault
Thisform.Caption="你按了 F9 键"
Case nKeyCode=-9&& F10
Nodefault
Thisform.Caption="你按了 F10 键"
Case nKeyCode=133&& F11
Nodefault
Thisform.Caption="你按了 F11 键"
Case nKeyCode=134&& F12
Nodefault
Thisform.Caption="你按了 F12 键"
Endcase
