以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  表事件，单元格结束后，执行一些操作。原来可以，现在升级后，提示错误，是什么原因？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=159522)
--  作者：hbfnmxb
--  发布时间：2020/12/29 11:21:00
--  表事件，单元格结束后，执行一些操作。原来可以，现在升级后，提示错误，是什么原因？
在表事件是执行：Afteredit事件代码

Dim dt1 As DataTable = DataTables("考生高考成绩信息")
Dim dt2 As DataTable = DataTables("省控制线")
For Each dr As DataRow In dt1.Select("")
    Dim filter As String = "文理分科 = \'" & dr("文理分科") & "\' and 录取年度 = \'" & dr("录取年度") & "\' and 选科系列 = \'" & dr("选科系列") & "\'"
    Dim fdr = dt2.find(filter)
    If fdr IsNot Nothing Then
        dr("省控制线") = fdr("省控制线")
        dr("实录分数") = fdr("实录分数")
        dr("实录排名") = fdr("实录排名")
        dr("实录差值") = fdr("实录差值")
    End If
Next

提示错误，不升级前，可以，现在不知问题出在哪里
--  作者：有点蓝
--  发布时间：2020/12/29 11:28:00
--  
建议把帮助《Foxtable编程》这种内容在好好看看，特别注意看帮助里的文字说明，而不是只看代码。

1、这种代码完全不适合放到表事件处理，如果是窗口按钮还差不多。一般表事件处理当前行即可，不需要遍历
2、如果要在表事件处理，建议到datacolchanged事件，并且注意：http://www.foxtable.com/webhelp/topics/1522.htm