表事件，单元格结束后，执行一些操作。原来可以，现在升级后，提示错误，是什么原因？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 表事件，单元格结束后，执行一些操作。原来可以，现在升级后，提示错误，是什么原因？

共有3290人关注过本帖树形打印复制链接主题：表事件，单元格结束后，执行一些操作。原来可以，现在升级后，提示错误，是什么原因？

hbfnmxb

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：二尾狐帖子：562 积分：6488 威望：0 精华：0 注册：2008/9/7 20:15:00

表事件，单元格结束后，执行一些操作。原来可以，现在升级后，提示错误，是什么原因？ 发帖心情

Post By：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

提示错误，不升级前，可以，现在不知问题出在哪里

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：超级版主帖子：112364 积分：572076 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2020/12/29 11:28:00 [只看该作者]

建议把帮助《Foxtable编程》这种内容在好好看看，特别注意看帮助里的文字说明，而不是只看代码。

1、这种代码完全不适合放到表事件处理，如果是窗口按钮还差不多。一般表事件处理当前行即可，不需要遍历

2、如果要在表事件处理，建议到datacolchanged事件，并且注意：http://www.foxtable.com/webhelp/topics/1522.htm

主题：表事件，单元格结束后，执行一些操作。原来可以，现在升级后，提示错误，是什么原因？