以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 代码 不 计算 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=55352) |
-- 作者:yifan3429 -- 发布时间:2014/8/14 21:36:00 -- 代码 不 计算 If e.DataCol.Name = "单位" Then If e.DataRow("单位") ="立方米" Then e.DataRow("产品_计量") = e.DataRow("产品_长") * e.DataRow("产品_宽") * e.DataRow("产品_高") / 1000000000 ElseIf e.DataRow("单位") ="平方米" Then e.DataRow("产品_计量") = e.DataRow("产品_宽") * e.DataRow("产品_高") / 1000000 ElseIf e.DataRow("单位") ="每延米" Then If e.DataRow("产品_计量") = e.DataRow("产品_长") / 1000 代码 不 计算 有问题吗?求教! End If End If End If
|
-- 作者:有点甜 -- 发布时间:2014/8/14 21:38:00 --
[此贴子已经被作者于2014-8-14 21:40:00编辑过]
|
-- 作者:有点甜 -- 发布时间:2014/8/14 21:40:00 -- If e.DataCol.Name = "单位" Then If e.DataRow("单位") ="立方米" Then e.DataRow("产品_计量") = e.DataRow("产品_长") * e.DataRow("产品_宽") * e.DataRow("产品_高") / 1000000000 ElseIf e.DataRow("单位") ="平方米" Then e.DataRow("产品_计量") = e.DataRow("产品_宽") * e.DataRow("产品_高") / 1000000 ElseIf e.DataRow("单位") ="每延米" Then e.DataRow("产品_计量") = e.DataRow("产品_长") / 1000 \'代码 不 计算 有问题吗?求教! End If End If |