窗口中有折扣（TextBox3）和实付现金（TextBox9）两个控件，希望输入折扣值后实付现金相应变化。实付现金通过销售明细表的datacolchanged来获得数值，代码如下：
Dim Filter As String = "订单号 = '" & e.DataRow("订单号") & "'"
e.Form.Controls("TextBox9").Text = DataTables("销售明细表").Compute("sum(金额)",Filter) - e.Form.Controls("TextBox3").value
折扣（TextBox3）Valuechanged代码如下：
Dim Filter As String = "订单号 = '" & Tables("销售订单.销售明细表").current("订单号") & "'"
e.Form.Controls("TextBox9").value = Tables("销售订单.销售明细表").Compute("sum(金额)",Filter) -cint(e.Form.Controls("TextBox3").value)
折扣的初始值设置为0
现在问题是：例如：折扣默认值为0时实付现金值350（为当前订单的销售明细金额之和），当输入折扣值如50时，实付现金数值为显示为-50。不知道问题出在哪。请帮忙分析一下，谢谢！
[此贴子已经被作者于2017/10/28 17:58:18编辑过]
加好友 
发短信
Post By：2017/10/28 17:42:00 [只看该作者]
