主题：[求助]代码求助

我在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

 

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

哦，发现不应该写在afteredit里=。=自己搞定了

不过还有个问题请教狐爸，我现在窗口绑定表了，如何让每次预览时显示的是空的数据？

而且我在预览时即使不保存，填在控件里的数据也会保存到表中，请问这个该如何解决？

好的。这样做也不错，比我本来想的只用录入窗口简单了不少。多谢狐爸

狐爸，还有个问题，如果我要设置某个控件为必填项，否则不能保存的话，还是写在保存BUTTON里么？

还有如果我需要在保存出库单时，先在入库单里搜到相应的编号，否则不能保存的话，有没有相应的案例？

狐大，还有个问题-。-

本来我想做成录入和修改是分开的，这样可以避免随便修改入库或出库的内容

请问传统编辑模式下可否判断新增或修改，从而在修改时对某些控件禁止编辑