主题：表达式计算问题请教老师

上传项目先~~~在表事件DataColChanged中输入以下代码,完成了金额合计列的计算

If e.DataCol.Name = "事项1金额" Then '如果更改的是事项1金额列
    If e.DataRow.IsNull("金额合计") Then '金额合计是否为空
        e.DataRow("事项1金额") = Nothing '如果为空,则清除事项1金额
    Else
        e.DataRow("金额合计")=e.DataRow("金额合计")-e.DataRow("事项1金额")
    End If
End If

想实现当事项1金额输入后再清除掉"金额合计"列的数值返回原先的数值,也就是重算"金额合计"列内容该怎么修改代码?请教老师

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目8.zip

第一种代码不行,金额合计输入2000后,事项1金额输入100后,金额合计就变-100数值了

方法二可行,但在后面的操作就变麻烦了

学生考虑用 e.NewValue  跟  e.OldValue

的话代码是不是更加麻烦,要判断很多东西

If e.DataCol.Name = "事项1金额" Then '如果更改的是事项1金额列
    If e.DataRow.IsNull("金额合计") Then '金额合计是否为空

        e.Cancel = True '则取消更改
    Else
        e.DataRow("金额合计")=e.DataRow("金额合计") -e.NewValue + e.OldValue
    End If
End If

学生一直在纠结怪怪的原因,看了林老师说的可能就是这个问题,但变化的金额不单单这一列还有三列需要进行数值输入后进行判断再进行加减,最后再进行piao据套打打印,而piao据打印过程中合

计金额是只有一列的,如果进行四列数值判断后再选择哪一列的数值做为最后的合计金额,那样的代码变的很麻烦

麻烦林老师帮忙看下学生更改过的代码可行不,或者其它方法可以解决问题