j 是可以的
用
得到焦点时
this.SelStart  ＝ allt(this.value)

[quote]j 是可以的
用
得到焦点时
this.SelStart  ＝ allt(this.value)[/quote]
如果想把起始点设置在最左边是
this.selstart=0?
如果想设置为一个表单新增记录的时候所有的text其实点都是最左边。要怎么设置比较快呢？（我有个表单，里面大概有40几个字段）一个一个设置不是好方法。
请老师赐教，谢谢。

在AfterRowcolChange事件中写入代码:
LPARAMETERS nColIndex  && nColIndex为当前列的序号
with this.columns(nColIndex).text1
  .SelStart  = LEN(allt(IIF(varTYPE(.value)='N',STR(.value),.value)))
endwith
-----------------------------
上述只考虑了字符型,数值型和备注型字段,如果还涉及到日期型字段,则还需作进一步调整.

[quote]在AfterRowcolChange事件中写入代码:
LPARAMETERS nColIndex  && nColIndex为当前列的序号
with this.columns(nColIndex).text1
  .SelStart  = LEN(allt(IIF(varTYPE(.value)='N',STR(.value),.value)))
endwith
-----------------------------
上述只考虑了字符型,数值型和备注型字段,如果还涉及到日期型字段,则还需作进一步调整.[/quote]
谢谢老师，也许是我说的不清楚，我说的表单是指form,我之所以提出这个问题是因为，同事在修改数值的时候，喜欢用鼠标去点要修改的字段，数值型的字段好像用鼠标点不会自动跑到最左边，字符型不会出现这个问题，所以经常有出现小数点位置出错的情况。
烦请老师再改下代码，同时帮忙指出代码要放在form的什么地方。（这个表单数值型，字符型，日期型都有）谢谢。

如果N个文本框是连续的，在：三楼代码的基础上，加个循环来设定，在表单的init事件中：
FOR i=1 to N
    mytextbox="text"- TRANSFORM(i)
with thisform.&mytextbox.
    .SelStart  = LEN(ALLTRIM(IIF(varTYPE(.value)="N","",.value)))
endwith
NEXT