Foxtable(狐表)用户栏目专家坐堂 → 筛选统计中表达式写得不正确,求正解


  共有2162人关注过本帖平板打印复制链接

主题:筛选统计中表达式写得不正确,求正解

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


加好友 发短信
等级:童狐 帖子:261 积分:2189 威望:0 精华:0 注册:2015/5/15 14:51:00
筛选统计中表达式写得不正确,求正解  发帖心情 Post By:2018/1/7 10:49:00 [只看该作者]

Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree(dt, "流程|年|主体名称","","流程,年,受理时间 DESC")
trv.StopRedraw
For Each nd As WinForm.TreeNode In trv.AllNodes
    Dim Year As Integer= nd.DataRow("年")
    Dim Product As String = nd.DataRow("主体名称")
    Dim P As String = nd.DataRow("负责人")
    Dim t As String = nd.DataRow("流程")
    Select Case nd.Level
        Case 0
            nd.Text = nd.text & "(" & dt.Compute("sum(件数)","流程 = '" & t & "'")  & "件)"
        Case 1
            
            nd.Text = nd.text & "年 (" & dt.Compute("sum(件数)", "流程 = '"&t&"' And "年 = "& Year) & "件)"
        Case 2
            nd.Text = nd.text & "|" & ""& p & ""
    End Select
Next
trv.Nodes.Insert("所有的行政许可","所有的行政许可(" & dt.Compute("sum(件数)") & "件)",0)


 回到顶部