以文本方式查看主题

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

--  作者:yetle
--  发布时间:2020/12/11 10:38:00
--  合计列
这列的合计列要怎么写??

Dim b As New CrossTableBuilder("统计表1",dt11)

b.HGroups.AddDef("平台名") \'添加客户列用于水平分组

b.VGroups.AddDef("月份","{0}月") \'添加日期列用于垂直分组

b.Totals.AddDef("销售金额") \'添加数量列用于统计
b.Build \'生成统计表
Tables("全平台数据看板_Table2").DataSource = b.Build()
Tables("全平台数据看板_Table2").AutoSizeCols()
Tables("全平台数据看板_Table2").GrandTotal = True \'显示合计模式

--  作者:有点蓝
--  发布时间:2020/12/11 10:48:00
--  
b.Totals.AddDef("销售金额") \'添加数量列用于统计
‘b.Build \'这一句去掉
Tables("全平台数据看板_Table2").DataSource = b.Builddatasource()
Tables("全平台数据看板_Table2").AutoSizeCols()
For Each c As Col In Tables("全平台数据看板_Table2").cols
    If c.name Like "*月" AndAlso c.IsNumeric
        c.GrandTotal = True
    End If
Next
Tables("全平台数据看板_Table2").GrandTotal = True \'显示合计模式

--  作者:yetle
--  发布时间:2020/12/11 10:57:00
--  
好像还是没出来合计数
图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20201211105229.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2020/12/11 11:03:00
--  
Dim b As New CrossTableBuilder("统计表1",dt11)

b.HGroups.AddDef("平台名") \'添加客户列用于水平分组

b.VGroups.AddDef("月份","{0}月") \'添加日期列用于垂直分组

b.Totals.AddDef("销售金额") \'添加数量列用于统计
b.Build \'生成统计表

截图看看表结构

--  作者:yetle
--  发布时间:2020/12/11 11:08:00
--  
好的
图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20201211110310.png
图片点击可在新窗口打开查看
[此贴子已经被作者于2020/12/11 11:08:16编辑过]

--  作者:有点蓝
--  发布时间:2020/12/11 11:24:00
--  
http://www.foxtable.com/webhelp/topics/0193.htm
--  作者:yetle
--  发布时间:2020/12/11 13:07:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20201211130159.png
图片点击可在新窗口打开查看
上图:
图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20201211130123.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2020/12/11 13:37:00
--  
晕。到命令窗口执行4楼的代码,然后会生成一个统计表,到foxtable里查看这个统计表的表结构,不是看数据库里的表啊
--  作者:yetle
--  发布时间:2020/12/11 13:48:00
--  
1
图片点击可在新窗口打开查看此主题相关图片如下:微信图片_20201211134334.png
图片点击可在新窗口打开查看

--  作者:有点蓝
--  发布时间:2020/12/11 13:49:00
--  
If c.name Like "*月" AndAlso c.IsNumeric

改为

If c.name Like "销售金额*" AndAlso c.IsNumeric

或者
If c.caption Like "*月" AndAlso c.IsNumeric

[此贴子已经被作者于2020/12/11 13:49:42编辑过]