自动追加行并汇总数量时，出现错误 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Select Case e.DataCol.Name
    Case "序号","检收1_数量","检收2_数量"
        If e.DataRow.IsNull("序号") = False AndAlso e.DataRow.IsNull("检收1_数量") = False
            Dim dr6 As DataRow
            dr6 = DataTables("入库").Find("序号 = '" & e.DataRow("序号") & "'")
            If dr6 Is Nothing Then
                dr6 = DataTables("入库").AddNew()
                dr6("序号") = e.DataRow("序号")
                dr6("产品编号") = e.DataRow("编号")
            End If
            dr6("数量") = e.DataRow("检收1_数量") + e.DataRow("检收2_数量")
            'DataTables("入库").DataCols("序号").RaiseDataColChanged(dr6)
        End If
End Select

主题：自动追加行并汇总数量时，出现错误