Foxtable(狐表)用户栏目专家坐堂 → 这个统计方法,必须只能统计第一列


  共有1477人关注过本帖树形打印复制链接

主题:这个统计方法,必须只能统计第一列

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


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57590 威望:0 精华:15 注册:2008/9/1 9:45:00
这个统计方法,必须只能统计第一列  发帖心情 Post By:2016/10/18 15:47:00 [显示全部帖子]

这个统计方法 只能将列放在第一个?
我测试了半天,放第一个就可以,放中间就不行?????????????????


Dim t As Table = Tables("订单")
Dim
g As SubtotalGroup
t.SubtotalGroups.Clear
()
t.GroupAboveData = False
t.TreeVisible = False
g = New
SubtotalGroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn =
"产品"
g.Caption =
"{0}"
t.SubtotalGroups.Add(g)
t.Subtotal()

Dim r As Row
For
i As Integer = 0 To t.Rows.Count(True) - 1
    r = t.Rows(i,True)
    If
r.IsGroup '如果是分组行
        Dim
f As String = "产品 = '" & r("产品") &
"'"
       
Dim v As String = " 订单数:" & t.Compute("Count(日期)",f)
        v = v & " 订购数量:" & t.Compute("Sum(数量)",f)
        v = v & " 订购金额:" & t.Compute("Sum(金额)",f)
        r("产品") = "产品:" & r("产品") & v
    End
If
Next


 回到顶部
帅哥哟,离线,有人找我吗?
blackzhu
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:狐仙 帖子:9875 积分:57590 威望:0 精华:15 注册:2008/9/1 9:45:00
  发帖心情 Post By:2016/10/18 15:58:00 [显示全部帖子]

 搞定了.

 回到顶部