主题：[求助]执行取消命令，Reject后,重算结果不正确

Reject不会触发DataColChanged事件，建议这种情况，换个方法实现reject，例如撤销当前行的修改：

Dim dr As DataRow = Tables("表A").current.DataRow
For Each dc As DataCol In DataTables("表A").DataCols
    dr(dc.name) = dr.OriginalValue(dc.name)
Next