在表格中切换单元格有2种方式，一种是用键盘的上下左右键，一种是鼠标直接点到某个单元格，我想实现的效果是鼠标点击单元格后与用键盘的上下左右键的效果一样，但是我总是达不到效果，我试了好几种代码，都不行，另外，我的表格在表单打开的时候就绑定了数据源,数据源是数字型的。我在text1的click事件中用的代码一是：this.setfocus 代码二是：

LOCAL fs,n
myvalue=this.value
DO case
case TYPE('myvalue')='C'
THIS.SELSTART=0   
THIS.SELLENGTH=LEN(ALLTRIM(myvalue))
case TYPE('myvalue')='N'
fs=FONTMETRIC(6,this.FontName,this.FontSize)+FONTMETRIC(16,this.FontName,this.FontSize)
fs=fs/2
n=round(this.Width/fs,0)

THIS.SELSTART=n-LEN(STR(myvalue))
THIS.SELLENGTH=LEN(STR(myvalue))
  
ENDCASE

吹水佬老师说得对，
应该忘了设置selectonentry的属性，明天上班试一下

甬车师傅的解答不大明白，
但吹水佬老师的解答解决了问题