主题：[求助]代码求助

我在datacolchanged里写了如下代码

If e.DataCol.Name = "单价" Then
  Dim da As DataRow = e.DataRow
  Select Case e.DataCol.Name
        Case "数量","单价"
            If da.IsNull("数量") OrElse da.IsNull("单价") Then
                da("合计金额") = Nothing
            Else
                da("合计金额") = da("数量") * da("单价")
            End If
    End Select
End If

希望能实现在相应的录入窗口中，输入单价会自动计算合计金额

但目前的情况是预览录入窗口测试时，不会自动计算合计金额，但关闭窗口返回表后会发现

合计金额已经计算，请问这是什么情况？

这是不可能的，这样的代码，对窗口输入有效的。

注意： 合计金额必须是数据列，不能是表达式列。

狐爸，我测试了很多次都是这样。能不能帮我看下，荒料出库表和窗口,

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

点击浏览该文件:仓管版本1.0.zip

荒料出库表没有窗口啊？

窗口都在表A里-0-

窗口名是什么？也就是说是哪一个窗口啊？

荒料出库加

因为你这个表的合计金额框，绑定的字段是：荒料入库.合计金额

 

应该绑定到：荒料出库.合计金额

=.=额。。居然是这种错误，谢谢狐爸

另外狐爸我再问个问题，我在afteredit里添加了段代码

If e.col.name="编号" Then
e.Row("经办人")=user.name & " "
End If

 

不知道为什么也是在表里可以实现，窗口下不能