以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  计算公式  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=95304)

--  作者:mengyun2020
--  发布时间:2017/1/16 12:58:00
--  计算公式

有一列是销售金额和付款方式,选择付款方式列中的现金或者转账,实收金额=销售金额,如果先择微信或者支付宝,实收金额=销售金额-销售金额*0.001,选择不同的付款方式,得到的实收金额不一样,公式怎么设置。

 


--  作者:mengyun2020
--  发布时间:2017/1/16 13:33:00
--  
在吗?付款方式一列下拉框里面先择不同的付款方式,计算出来的实收金额不同
--  作者:mengyun2020
--  发布时间:2017/1/16 13:45:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb


--  作者:mengyun2020
--  发布时间:2017/1/16 13:53:00
--  
???
--  作者:有点色
--  发布时间:2017/1/16 14:11:00
--  
If e.DataCol.Name = "实收金额" Then \'如果更改的是身份证号码列
    If e.DataRow.IsNull("实收金额") Then \'身份证号码是否为空
        e.DataRow("手续费") = Nothing \'如果为空,则清除出生日期
    Else
        \'否则从身份证号码列中提取出生日期
        e.DataRow("手续费") = e.DataRow("销售金额")-e.DataRow("实收金额")
    End If
Else If e.DataCol.name = "付款方式" OrElse e.DataCol.name = "销售金额" Then
    If e.DataRow("付款方式") = "微信" OrElse  e.DataRow("付款方式") = "支付宝" Then
        e.DataRow("实收金额") = e.DataRow("销售金额") * (1-0.001)
    Else
        e.DataRow("实收金额") = e.DataRow("销售金额")
    End If
End If