我刚刚查了，
我加了个计数器，触发BeforeRowColChange，就+1
结果，发现，计数器数值很大了。
**BeforeRowColChange 事件
LPARAMETERS nColIndex
JJJ=JJJ+1
IF THISFORM.OPT1.Value=1 &&AND loaddata =.t. &&修改该数据时，选择列操作
  If (Lastkey()>=48 AND Lastkey()<=57) OR Lastkey()=13  &&最后按0～9或者回车后下移
      Nodefault
      Keyboard "{DNARROW}"
  ENDIF
ENDIF
发现JJJ的值，有时候，100W多次。。。

但如果，
IF THISFORM.OPT1.Value=1 AND loaddata =.t.
这样，JJJ的值，就只有2，
估计是 Keyboard "{DNARROW}"，造成的，假触发，死循环


[ 本帖最后由 mywisdom88 于 2015-7-24 22:21 编辑 ]

但是，见鬼的，就是，
同样的，在VFP本地VFP上取数据，JJJ=0,,,
SELECT SDB
WAIT WINDOW NOWAIT '正在读取本月数据......'

SELECT 0 AS 选择, 编号,..............
     WHERE &cWHERE ;
     FROM SDB ORDER BY 编号 ASC INTO TABLE TEMP\SDB_DJ
INDEX ON 编号 TAG 编号
SELECT SDB_DJ
THISFORM.Grid1.RECORDSOURCE=''
THISFORM.Grid1.COLUMNCOUNT = -1
THISFORM.Grid1.RECORDSOURCE=ALIAS()
这样取本地VFP数据，JJJ=0,也就是说，我在取数的过程中，这个事件，没有给触发

但我在SQL2000中取数，
TEXT TO SQL_str NOSHOW TEXTMERGE PRETEXT 4
SELECT 0 AS 选择, 编号,..............
    FROM SDB
    WHERE <<WHERE>>
ENDTEXT
SQLEXEC(nhandle,sql_str,'sql_sdb')
这样取SQL2000的数据下来，却给触发了百万次。。

改为你说的，在LOSTFOCUS中，彻底解决了问题。
计数器，没计数了JJJ=0了。
FOR J=4 TO 21
    BINDEVENT(thisform.grid1.Columns[J].text1,"LostFocus",thisform,"MyLostFocus") &&指令绑定VFP9.0才有
ENDFOR

**MyLostFocus
JJJ=JJJ+1
IF THISFORM.OPT1.Value=1  &&修改该数据时，选择列操作
  If (Lastkey()>=48 AND Lastkey()<=57) OR Lastkey()=13  &&最后按0～9或者回车后下移
      Nodefault
      Keyboard "{DNARROW}"
  ENDIF
ENDIF