表单中有一表格控件,有数据,程序执行中,如何实现鼠标单击表格控件中的数据后,使该格数据为选定状态(即蓝底色)

在aftertowcolclchange 中
LPARAMETERS nColIndex
Local m_recn,m_recnnum,m_i
m_recn=recn()
M_RECNSTR=ALLTRIM(STR(m_recn))
For m_i=1 to THIS.ColumnCount
This.columns[M_I].DynamicForeColor="IIf(recn()="+M_RECNSTR+",RGB(0,255,255),RGB(255,255,225))"
This.columns[M_I].DynamicbackColor="IIf(recn()="+M_RECNSTR+",RGB(255,255,225),RGB(0,255,225))"
Endfor
This.REFRESH

可能是我没说清楚,不是2楼老师回答的意思.
我是想实现当鼠标单击表格控件中的任一格数据后,只要一开始重新输入新数据时,原来的数据就没有了,而不是输入1个数字,原来的数据减少一位,输入2个数字,原来的数据就减少2位......就是要达到像用箭头或TAB键将焦点移到该格一样.谢谢!