以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  求助:条件求和报错  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=124468)

--  作者:cxmxjwlmq
--  发布时间:2018/9/6 18:07:00
--  求助:条件求和报错

各位老师:这段代码我想要的结果是:对售后质量管理表中日期大于等于变量jny8小于等于jny8z的赔偿金额进行求和并在报表的第9行10列显示。

 

  Dim jyncs13 As Integer  = DataTables("售后质量管理").Compute("Sum(赔偿金额)", "  日期>= # " & jny8  & "#   And 日期<= # " & jny8z  & "#")
   Sheet(9,10 ).Value = jyncs13 

 

但结果如下图。

  
图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20180906180929.png
图片点击可在新窗口打开查看

 

 

代码那里错了,请老师指教!


--  作者:有点甜
--  发布时间:2018/9/6 20:24:00
--  

1、列【赔偿金额】改成数值列,不能用字符列;

 

2、

 

Dim jyncs13 As Integer  = DataTables("售后质量管理").Compute("Sum(赔偿金额)", "  日期>= # " & jny8  & "#   And 日期<= # " & jny8z  & "#")

 

改成

 

Dim jyncs13 As double  = DataTables("售后质量管理").Compute("Sum(赔偿金额)", "  日期>= #" & jny8  & "#   And 日期<= #" & jny8z  & "#")


--  作者:cxmxjwlmq
--  发布时间:2018/9/7 0:18:00
--  

谢谢甜老师指教!