以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助],老师帮我看这段代码存在什么问题,谢谢  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=46224)
--  作者：andycun
--  发布时间：2014/2/19 13:32:00
--  [求助],老师帮我看这段代码存在什么问题,谢谢
If e.DataCol.Name = "工种" Then \'如果更改的是工种列
    If e.DataRow.IsNull("工种") Then \'工种是否为空
        e.DataRow("单价") = Nothing \'如果为空,则清除单价
    Else
        \'否则
        e.DataRow("单价") = e.DataRow.GetParentRow("工价")("单价")\'从关联父表中的单价列提取单价
    End If
End If

If e.DataCol.Name = "计数" Then \'如果更改的是计数列
    If e.DataRow.IsNull("计数") Then \'计数是否为空
        e.DataRow("金额") = Nothing \'如果为空,则清除金额
    Else
        \'否则
        e.DataRow("金额") = ("单价")*("计数")
    End If
End If

想实现  更改工种,单价由父表的单价列做相应改变
           更改计数,金额列重新计算  
--  作者：lsy
--  发布时间：2014/2/19 13:44:00
--  
e.DataRow("金额") = e.DataRow("单价")*e.DataRow("计数")