以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 请教用代码写公式问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=131219) |
-- 作者:weipeng6999 -- 发布时间:2019/2/20 15:59:00 -- 请教用代码写公式问题 老师好!我想在DataColChanged事件中用代码写公式,表2中的 结算价=(开票价-底价)*税率+底价 开票价,底价,税率,都取自表1, 这四个字段都是Double型。请教该如何写?
|
-- 作者:有点蓝 -- 发布时间:2019/2/20 16:17:00 -- 参考:http://www.foxtable.com/webhelp/scr/1451.htm 表1、DataColChanged事件 Dim dr As DataRow = e.DataRow Select Case e.DataCol.Name Case "开票价","底价","税率" Dim dr As DataRow = DataTables("表2").find("编号=\'" & 编号 & "\'") If dr IsNot Nothing Then dr("结算价") = (e.DataRow("开票价") - e.DataRow("底价")) * e.DataRow("税率") + e.DataRow("底价") End If End Select |
-- 作者:weipeng6999 -- 发布时间:2019/2/20 16:22:00 -- 谢谢蓝老师 |