以下是引用liuxingang28在2014-3-19 19:53:43的发言:
在文本框的 GotFocus 事件中输入如下代码:
* 无内容或内容为数值型时,将光标定位到开头
if empty(this.value) or type('this.value') = 'N'
nodefault
dodefault()
this.SelStart = 0
endif
文本框的数据类型不一定是数值型,我认为不需要加以限定或判断。
在文本框的 GotFocus 事件中输入如下代码:
* 无内容或内容为数值型时,将光标定位到开头
if empty(this.value) or type('this.value') = 'N'
nodefault
dodefault()
this.SelStart = 0
endif
坚守VFP最后的阵地