Foxtable(狐表)用户栏目专家坐堂 → [求助]窗口中显示统计表问题


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

主题:[求助]窗口中显示统计表问题

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
[求助]窗口中显示统计表问题  发帖心情 Post By:2015/8/7 11:25:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150807111353.png
图片点击可在新窗口打开查看

 

上面是在表里做的分组统计, 里面有小计, 总计

复制的代码如下:

 

Dim g As New GroupTableBuilder("统计表1", DataTables("订单"))
g.Groups.AddDef("日期", DateGroupEnum.Year, "年")
g.Groups.AddDef("客户")
g.Totals.AddDef("数量")
g.Totals.AddDef("金额")
g.SubTotal = True
g.FromServer = True
g.Build()
MainTable = Tables("统计表1")

 

做了一个窗口, 加入一个按钮和一个表

按钮的代码如下:

Dim g As New GroupTableBuilder("统计表1", DataTables("订单"))
g.Groups.AddDef("日期", DateGroupEnum.Year, "年")
g.Groups.AddDef("客户")
g.Totals.AddDef("数量")
g.Totals.AddDef("金额")
g.SubTotal = True
g.FromServer = True
g.Build()
Tables ("窗口2_Table1" ). DataSource  = DataTables ("统计表1" )

 

在窗口中生成如下表, 没有小计和总计, 如何做成有小计,和总计呢?同表的分组统计生成的统计表一样呢?

 

 


 


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20150807111634.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/8/7 11:32:00 [只看该作者]

方法一:

 

Dim g As New GroupTableBuilder("统计表1", DataTables("订单"))
g.Groups.AddDef("日期", DateGroupEnum.Year, "年")
g.Groups.AddDef("客户")
g.Totals.AddDef("数量")
g.Totals.AddDef("金额")
g.SubTotal = True
g.FromServer = True

Tables ("窗口2_Table1" ). DataSource  = g.BuildDataSource

 

 

方法二:先分组统计,然后再用汇总统计。


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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2015/8/7 11:46:00 [只看该作者]

谢谢大红袍老师!

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


加好友 发短信
等级:八尾狐 帖子:1838 积分:13006 威望:0 精华:0 注册:2013/6/10 9:23:00
  发帖心情 Post By:2015/8/7 11:51:00 [只看该作者]

再问老师, 统计表1的字体如何放大呢

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/8/7 12:34:00 [只看该作者]

以下是引用seal51在2015/8/7 11:51:00的发言:
再问老师, 统计表1的字体如何放大呢

 

Tables("表A").font = New Font("宋体", 15)


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


加好友 发短信
等级:一尾狐 帖子:481 积分:3258 威望:0 精华:0 注册:2015/6/2 8:33:00
  发帖心情 Post By:2015/8/7 12:36:00 [只看该作者]

老师 此例中有没有什么办法让列宽自动适应其内容的长度


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/8/7 12:38:00 [只看该作者]

以下是引用扶风在2015/8/7 12:36:00的发言:

老师 此例中有没有什么办法让列宽自动适应其内容的长度

 

http://www.foxtable.com/help/topics/1669.htm

 


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


加好友 发短信
等级:一尾狐 帖子:481 积分:3258 威望:0 精华:0 注册:2015/6/2 8:33:00
  发帖心情 Post By:2015/8/7 15:10:00 [只看该作者]

谢谢大红袍老师  这段代码Tables("员工").AutoSizeCols()应该写在哪个位置  表事件的afterload事件还是


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/8/7 15:12:00 [只看该作者]

 写在任意位置都可以,你想自动的时候,就加入此代码。

 

 比如可以写在 DataColChanged 事件


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


加好友 发短信
等级:一尾狐 帖子:481 积分:3258 威望:0 精华:0 注册:2015/6/2 8:33:00
  发帖心情 Post By:2015/8/7 15:17:00 [只看该作者]

好的 谢谢老师

 回到顶部