主题:求助
lzzxsu
[专家分:180] 发布于 2009-05-31 20:14:00
求一小程序,要求表单有多个文本框,指定一个用来接收多个数据的文本框,这个文本框在单击或回车后,光标不允许上跳出,只有用鼠标单击别的文本框后光标才跳出。请各位师傅指点。最好编写成程序代码。谢谢!
最后更新于:2009-05-31 21:33:00
回复列表 (共3个回复)
沙发
alpen [专家分:1140] 发布于 2009-06-01 12:57:00
思路是:
在该文本框的方法程序中设置获得焦点
如不变,则
this.setfocus
如换了点到另外的文本框,在该文本框的方法程序Click Event中设置获得焦点
this.setfocus
板凳
lzzxsu [专家分:180] 发布于 2009-06-07 06:46:00
我试过这种做法,要用两个以上的文本框,并且如果在输入过程中出错,光标还是乱跑。
3 楼
qjbzjp [专家分:8830] 发布于 2009-06-07 09:06:00
在表单的Load事件中:
Publ myKeyCode
在文本框的Keypress事件中:
IF nKeyCode=13
myKeyCode=.f.
ELSE
myKeyCode=.t.
ENDIF
在文本框的Valid事件中:
IF !myKeyCode
myKeyCode=.t.
RETURN 0
endif
我来回复