以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]求大神帮忙  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=137978)
--  作者：luogk1
--  发布时间：2019/7/19 14:55:00
--  [求助]求大神帮忙

下面代码为什么不能分[gs]求累计[js]

 

Dim dr As DataRow = e.DataRow

Select Case e.DataCol.Name

    Case "rq","js"

        Dim Sum As Integer

        Sum =  DataTables("sjb").Compute("Sum(js)", "[gs] = \'" & Vars("gs") & "\'")

        dr("ljjs") = DataTables("sjb").Compute("Sum(js)")

End Select

<!--EndFragment-->
--  作者：有点蓝
--  发布时间：2019/7/19 15:14:00
--  
Dim dr As DataRow = e.DataRow
Select Case e.DataCol.Name
    Case "js"
        dr("ljjs") = DataTables("sjb").Compute("Sum(js)", "[gs] = \'" & Vars("gs") & "\'")
End Select
--  作者：luogk1
--  发布时间：2019/7/19 15:40:00
--  

蓝老师 改了代码还是不行
--  作者：有点蓝
--  发布时间：2019/7/19 15:50:00
--  
什么地方不行？截图说明