Foxtable(狐表)用户栏目专家坐堂 → 非表达式列的自动计算


  共有2118人关注过本帖树形打印复制链接

主题:非表达式列的自动计算

帅哥哟,离线,有人找我吗?
luckbetter333
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:298 积分:2426 威望:0 精华:0 注册:2016/11/2 9:30:00
非表达式列的自动计算  发帖心情 Post By:2018/8/1 9:00:00 [只看该作者]

不想使用重置列按钮,也不想切换表后才重置。希望同一个表中某一列变化后,结果列马上变化。应该怎么办?
datacolchanged中计算代码是
Select Case e.DataCol.Name

    Case "订单数量","到货数量"
        e.DataRow("欠货数量")= e.DataRow("订单数量")-e.DataRow("到货数量")
end select


 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/8/1 9:43:00 [只看该作者]

你修改【订单数量】【到货数量】,只要这两列不是表达式列,你修改后,都会触发代码计算的。

 

如果是表达式列,看看 http://www.foxtable.com/webhelp/scr/2381.htm

 


 回到顶部
帅哥哟,离线,有人找我吗?
luckbetter333
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:298 积分:2426 威望:0 精华:0 注册:2016/11/2 9:30:00
  发帖心情 Post By:2018/8/1 9:48:00 [只看该作者]

Select Case e.DataCol.Name
   Case "订单数量","到货数量"
        e.DataRow("欠货数量")= e.DataRow("订单数量")-e.DataRow("到货数量")

 Case "单价","到货数量"
        e.DataRow("到货金额")= e.DataRow("单价")*e.DataRow("到货数量")
    
    Case "到货数量","退货数量"
        e.DataRow("最终到货数量")= e.DataRow("到货数量")-e.DataRow("退货数量")  
  Case "退货单价","退货数量"
        e.DataRow("退货金额")= e.DataRow("退货单价")*e.DataRow("退货数量")  

  Case "到货金额","退货金额"
        e.DataRow("最终到货金额")= e.DataRow("到货金额")-e.DataRow("退货金额")
     

 
End Select

欠货数量好用了,订货数量和到货数量变化,欠货数量跟着变。现在的情况是我修改到货数量,单价不变,到货金额不变;我修改退货数量,退货单价不变,退货金额不变;修改到货数量,退货数量不变,最终到货数量不变。应该怎么办呢?

 回到顶部
帅哥哟,离线,有人找我吗?
有点甜
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/8/1 10:16:00 [只看该作者]

Select Case e.DataCol.Name
    Case "订单数量","到货数量"
        e.DataRow("欠货数量")= e.DataRow("订单数量")-e.DataRow("到货数量")
End Select
Select Case e.DataCol.Name
    Case "单价","到货数量"
        e.DataRow("到货金额")= e.DataRow("单价")*e.DataRow("到货数量")
End Select
Select Case e.DataCol.Name
    Case "到货数量","退货数量"
        e.DataRow("最终到货数量")= e.DataRow("到货数量")-e.DataRow("退货数量")
End Select
Select Case e.DataCol.Name
    Case "退货单价","退货数量"
        e.DataRow("退货金额")= e.DataRow("退货单价")*e.DataRow("退货数量")
End Select
Select Case e.DataCol.Name
    Case "到货金额","退货金额"
        e.DataRow("最终到货金额")= e.DataRow("到货金额")-e.DataRow("退货金额")
End Select


 回到顶部
帅哥哟,离线,有人找我吗?
luckbetter333
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:童狐 帖子:298 积分:2426 威望:0 精华:0 注册:2016/11/2 9:30:00
  发帖心情 Post By:2018/8/1 10:38:00 [只看该作者]

好用了,感谢!

 回到顶部