以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  列统计问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=82964)

--  作者:jamhuton
--  发布时间:2016/3/29 9:04:00
--  列统计问题
列统计公式:
Select Case e.DataCol.name
    Case "客户简称","月份"
        e.DataRow("进口成本") = DataTables("成本明细").Compute("sum(成本合计)","[客户简称]= \'" & e.DataRow("客户简称") & "\' and [月份]= \'" & e.DataRow("月份") & "\'" )
End Select
这个可以执行
Select Case e.DataCol.name
    Case "客户简称","月份",“运输方式”
        e.DataRow("进口成本") = DataTables("ta成本").Compute("sum(成本合计)","[客户简称]= \'" & e.DataRow("客户简称") & "\' and [月份]= \'" & e.DataRow("月份") & "\' and [运输方式]= \'" & e.DataRow("运输方式") & "\'" )
End Select
加了上述代码后,连前面一个代码也不执行了
是不是同一列不能有2个代码?
如何解决?

--  作者:大红袍
--  发布时间:2016/3/29 9:28:00
--  
 两个代码一起执行的,那 进口成本 的值肯定是后面执行的结果啊
--  作者:jamhuton
--  发布时间:2016/3/29 9:44:00
--  
条件不同啊


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


--  作者:jamhuton
--  发布时间:2016/3/29 9:45:00
--  
这个是前面的代码的执行结果
后面的代码加上去前面的就不执行了,如何做到2个代码都执行呢?

--  作者:大红袍
--  发布时间:2016/3/29 10:04:00
--  

Select Case e.DataCol.name
    Case "客户简称","月份","运输方式"
        If e.DataRow.IsNull("运输方式") Then
            e.DataRow("进口成本") = DataTables("成本明细").Compute("sum(成本合计)","[客户简称]= \'" & e.DataRow("客户简称") & "\' and [月份]= \'" & e.DataRow("月份") & "\'" )
        Else
            e.DataRow("进口成本") = DataTables("ta成本").Compute("sum(成本合计)","[客户简称]= \'" & e.DataRow("客户简称") & "\' and [月份]= \'" & e.DataRow("月份") & "\' and [运输方式]= \'" & e.DataRow("运输方式") & "\'" )
        End If
End Select


--  作者:jamhuton
--  发布时间:2016/3/29 10:15:00
--  
谢谢老师