以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]表事事件计算单价与金额问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=153551)

--  作者:huangfanzi
--  发布时间:2020/8/14 15:27:00
--  [求助]表事事件计算单价与金额问题
表中有如下代码:
DataColChanged 事件
    If e.DataCol.Name = "结算数量" OrElse e.DataCol.Name = "结算含税单价" Then
        e.DataRow("结算含税金额") = Round2(e.DataRow("结算数量") * e.DataRow("结算含税单价"),2)
    End If

现在用户提出来,希望也能支持 录入数量与金额后能自动算单价的功能,刚才编辑了下,搞的死循环了,老师,请指导下应该如何实现

--  作者:有点蓝
--  发布时间:2020/8/14 15:33:00
--  
这个代码不可能死循环。

DataColChanged 事件还有其它代码?

--  作者:huangfanzi
--  发布时间:2020/8/14 15:56:00
--  
这个代码是没错,是原来的,我现在要增加代码,实现录入数量与金额后算单价的功能,请老师帮我写下,我写来写去就是死循环
--  作者:有点蓝
--  发布时间:2020/8/14 16:03:00
--  
    If e.DataCol.Name = "结算数量" OrElse e.DataCol.Name = "结算含税单价" Then
systemready = false
        e.DataRow("结算含税金额") = Round2(e.DataRow("结算数量") * e.DataRow("结算含税单价"),2)
systemready = true
    End If

    If e.DataCol.Name = "结算数量" OrElse e.DataCol.Name = "结算含税金额" Then
systemready = false
        e.DataRow("结算含税单价") = xxx
systemready = true
    End If