主题：执行效率问题，两万多行记录就卡死掉了

数据导入之后，要重新计算收款金额，重置列之后卡死

Select Case e.DataCol.Name
    Case "BianMa"
        Dim Filter As String = "DDBianMa = '" & e.DataRow("BianMa") & "'"
        e.DataRow("DaoZhang") = DataTables("ShouKuan").Compute("Sum(JinE)", Filter)
End Select

呵呵.2万多行肯定需要点时间.无解.   等一下就计算完就OK了.

建议你采取分页加载吧.

看你的代码，为什么不用表达式列完成呢？

我筛选之后再重置列，也是一样的。

我考虑一下狐爸的方法，一直不大喜欢用表达式列。

等了两个小时还没算好  i5  4g   其他的计算都是正常的

1、这种计算，显然应该用表达式列

2、但是用代码也不应该这么慢，可以DaoZhang列的值变化，触发了DataColChanged事件中的某些代码。

3、帮助中有关效率的这一章，也可以看看。

 你的datacolchanged里面是不是有别的代码？单纯计算也不需要那么久的才对。

 

 你试试10行/100行/1000行的计算时间。

单条记录的修改是没有问题的，但是从原先的系统导入数万条记录过来了，不能一条条去编辑，就用了重置列的方法，把之前的数据在重新计算一遍

我已经把其他代码过滤掉了。只保留了这一个

筛选结果出来100行，最后重置列的效果是一样的。也是卡死了