专家坐堂-列统计问题Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  列统计问题  (http://foxtable.net/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
--
谢谢老师