这是表示什么错误

Select Case e.DataCol.Name
    Case "二级编码","入库数量"
        Dim dr As DataRow
        Dim mr As DataRow = e.DataRow
        Dim drs As List(of DataRow)
        dr = e.DataTable.Find("[_SortKey] < " & mr("_SortKey") & " And [二级编码] = \'" & mr("二级编码") & "\'", "[_SortKey] Desc")
        If dr Is Nothing Then \'如果没有上一行,说明本行就是同产品的第一行
            mr("库存数量") = mr("入库数量")
            dr = mr
        End If
        drs = e.DataTable.Select("[_SortKey] >= " & dr("_SortKey") & " And [二级编码] = \'" & dr("二级编码") & "\'")
        For i As Integer = 1 To drs.Count - 1 \'重算余下行的余额
            drs(i)("库存数量") = drs(i-1)("库存数量") + drs(i)("入库数量")
        Next
End Select

这样的代码：看不出来哪里问题

    DataTables("商品库存").DataCols("二级编码").RaiseDataColChanged("二级编码 = \'" &e.DataRow("二级编码") & "\'")

试了好多次都不行，最后把代码剪切掉，重新打开项目，再把代码复制上去操作就可以了，不知道是什么原因