Foxtable(狐表) → 用户栏目 → 专家坐堂 → 再求分组统计


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

主题：再求分组统计
帅哥哟，离线，有人找我吗？
有点蓝
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109720 积分：558310 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/4/25 20:59:00 [显示全部帖子]

去掉下面代码
Dim g As New GroupTableBuilder("统计表1", DataTables("入库明细"))
g.Groups.AddDef("入库日期", DateGroupEnum.Year, "年")
g.Groups.AddDef("入库日期", "月")
g.Groups.AddDef("商品名称")
g.Totals.AddDef("入库数量")
g.Totals.AddDef("入库金额")
g.Totals.AddDef("入库单价",AggregateEnum.Average )
g.Filter = "商品名称 is not null"
Dim dt As DataTable = g.Build(True)

MainTable = Tables("统计表")

然后把3楼代码里"统计表"全部改为"出入库月统计_月汇总"
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109720 积分：558310 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/4/25 21:39:00 [显示全部帖子]

用5楼代码，加一句
Tables("出入库月统计_月汇总").DataSource = dt1 '将统计结果绑定到Table
dim dt as datatable = dataTables("出入库月统计_月汇总")
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109720 积分：558310 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/4/26 9:18:00 [显示全部帖子]

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:进销存9.zip
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109720 积分：558310 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/4/26 13:58:00 [显示全部帖子]

看9楼项目出入库月统计窗口按钮代码

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109720 积分：558310 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/4/26 15:11:00 [显示全部帖子]

窗口名称，或者控件名称不正确

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109720 积分：558310 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/4/26 20:36:00 [显示全部帖子]

明细表有空行，把空行删除。或者在统计代码里加上条件，排除空行

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109720 积分：558310 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/4/26 21:28:00 [显示全部帖子]

删除之后没有保存吧，统计使用了g.FromServer = True，是直接去取后台数据的。另外窗口表只是一个过渡，实际数据在“统计表”这个表里。

如果安装了最新的2021版，可以不通过窗口表，直接把这2句
Tables("出入库月统计_月汇总").DataSource = dt1 '将统计结果绑定到Table
Dim dt As DataTable = DataTables("出入库月统计_月汇总")

改为这样即可
Dim dt As DataTable = dt1.ToDataTable()

然后程序把窗口表控件绑定到“统计表”
 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109720 积分：558310 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/4/26 21:53:00 [显示全部帖子]

把统计表的年、月列改为整型类型

 回到顶部
帅哥哟，离线，有人找我吗？
有点蓝
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：超级版主 帖子：109720 积分：558310 威望：0 精华：9 注册：2015/6/24 9:21:00 		  发帖心情 Post By：2021/4/28 13:41:00 [显示全部帖子]

都说了窗口表只是一个过渡用的。至于本月结存我没有处理，自己的工作不要全部都等着别人处理。本月结存不就是上月+入库-出库？数据都有了，这种加减法应该会吧：http://www.foxtable.com/webhelp/topics/1452.htm

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.03906 秒, 6 次数据查询