textbox编辑到最后时，或者说光标移动到textbox最后时，不让光标自动移到下一个控件,让光标停下来。用SET CONFIRM ON/OFF 不行

[ 本帖最后由 shenkj001 于 2015-6-18 15:33 编辑 ]

主要是输入时各个文本框里的要输的内容长短不一，不能常用回车。

你好!用回车或Tab均可以。主要是想在多个相同MAXLENGTH的文本框中输入不等长信息时，解决习惯性回车到下一个文本框问题。有的信息长度正好与maxlength相等，会自动到下一个文本框，这时再习惯性回车，就会隔过一个文本框，到下下一个文本框。如果加大maxlength,文本框的值会超过存入字段的长度。

[ 本帖最后由 shenkj001 于 2015-6-18 18:53 编辑 ]

谢谢了！我把“0”改成“this.maxlength”，这样光标到最大值时就不动了，还能用回车，解决了问题。
** TextBox的LostFocus事件
IF INLIST(LASTKEY(), 9, 13)
     RETURN .T.
 ENDIF
 NODEFAULT
 this.SelStart = this.maxlength