主题：选入死循环 请支招

主表是datatable（“进出库记录”)

 Select Case e.DataCol.Name
        Case "吨位"
            Dim sr1 As DataRow = DataTables("商务结算表").addnew()
            sr1("日期") = e.DataRow("日期")
            sr1("客户名称") = e.DataRow("客户名称")
            sr1("货物种类") = e.DataRow("货物种类")
            sr1("进出库分类") = e.DataRow("进出库分类")
            sr1("到发方式") = e.DataRow("到发方式")
            sr1("车船数")=e.DataRow("车船数")
            sr1("吨位") =e.DataRow("吨位")
    End Select

另外，对主表的 “吨位”列设置了 打开项目前重置

 

没有，但是 在afteropenobject中 重置了 “吨位”列

测试了下时间 没有上述代码是 耗时5秒，现在耗时120秒。怎么回事呢？

不好多 也才1500行。

请问一下，有什么方法可以 让正在访问的行可以默认 上一行的内容了，部分修改后，就可以继续往下录入。

克隆不能解决部分修改的问题