回 帖 发 新 帖 刷新版面

主题:求助

求一小程序,要求表单有多个文本框,指定一个用来接收多个数据的文本框,这个文本框在单击或回车后,光标不允许上跳出,只有用鼠标单击别的文本框后光标才跳出。请各位师傅指点。最好编写成程序代码。谢谢!

回复列表 (共3个回复)

沙发

思路是:
在该文本框的方法程序中设置获得焦点
如不变,则
this.setfocus
如换了点到另外的文本框,在该文本框的方法程序Click Event中设置获得焦点
this.setfocus

板凳


我试过这种做法,要用两个以上的文本框,并且如果在输入过程中出错,光标还是乱跑。

3 楼

在表单的Load事件中:
Publ myKeyCode

在文本框的Keypress事件中:
IF nKeyCode=13
    myKeyCode=.f.
ELSE 
    myKeyCode=.t.
ENDIF

在文本框的Valid事件中:
IF !myKeyCode    
    myKeyCode=.t.
    RETURN 0
endif 

我来回复

您尚未登录,请登录后再回复。点此登录或注册