Foxtable(狐表)用户栏目专家坐堂 → 如何在窗口统计汇总


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

主题:如何在窗口统计汇总

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


加好友 发短信
等级:小狐 帖子:311 积分:2288 威望:0 精华:0 注册:2011/9/22 10:21:00
如何在窗口统计汇总  发帖心情 Post By:2017/9/13 16:56:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看



筛选了三天的日期记录,如何 想在窗口做一个根据不同产品,汇总不同产品数量之和,该怎么做?求代码

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/9/13 17:11:00 [只看该作者]


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


加好友 发短信
等级:小狐 帖子:311 积分:2288 威望:0 精华:0 注册:2011/9/22 10:21:00
  发帖心情 Post By:2017/9/13 17:16:00 [只看该作者]

知道。那在窗口里怎么解决呀。做个按钮吗?还是能通过其它方式,在窗口里显示出来呢?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/9/13 17:17:00 [只看该作者]

以下是引用周子杰在2017/9/13 17:16:00的发言:
知道。那在窗口里怎么解决呀。做个按钮吗?还是能通过其它方式,在窗口里显示出来呢?

 

把代码写在查询按钮的后面。把两段代码合并一下即可。

 

贴出你写的代码。


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


加好友 发短信
等级:小狐 帖子:311 积分:2288 威望:0 精华:0 注册:2011/9/22 10:21:00
  发帖心情 Post By:2017/9/14 22:40:00 [只看该作者]

Dim g As New GroupTableBuilder("统计表5", DataTables("订奶信息"))
g.Groups.AddDef("changp")
g.Totals.AddDef("shul")
g.FromServer = True
g.Build()
MainTable = Tables("统计表5")

代码不知怎么写呀,

如果按第一次筛选12-14号(三天)的统计,得出的结果是对的,
如果再筛选15-17号(三天)的数据,却得不出新的结果,却得的是第一次筛选的结果

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


加好友 发短信
等级:小狐 帖子:311 积分:2288 威望:0 精华:0 注册:2011/9/22 10:21:00
  发帖心情 Post By:2017/9/14 22:42:00 [只看该作者]


第一次筛选的结果:

图片点击可在新窗口打开查看此主题相关图片如下:0-1.jpg
图片点击可在新窗口打开查看


图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看


第二次筛选的条件:


图片点击可在新窗口打开查看此主题相关图片如下:0-2.jpg
图片点击可在新窗口打开查看



统计的结果和第一次的一样。


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/9/14 23:07:00 [只看该作者]

Dim g As New GroupTableBuilder("统计表5", DataTables("订奶信息"))
g.Groups.AddDef("changp")
g.Totals.AddDef("shul")
g.Filter = filter '你筛选按钮得到的筛选条件
g.Build()
MainTable = Tables("统计表5")
 
----------------------
 
Dim g As New GroupTableBuilder("统计表5", DataTables("订奶信息"))
g.Groups.AddDef("changp")
g.Totals.AddDef("shul")
g.Filter = filter '你筛选按钮得到的筛选条件
e.Form.Controls("Table1").Table.DataSource = g.BuildDataSource
 

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


加好友 发短信
等级:小狐 帖子:311 积分:2288 威望:0 精华:0 注册:2011/9/22 10:21:00
  发帖心情 Post By:2017/9/15 15:45:00 [只看该作者]

还是不明白。请指教



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


加好友 发短信
等级:小狐 帖子:311 积分:2288 威望:0 精华:0 注册:2011/9/22 10:21:00
  发帖心情 Post By:2017/9/15 15:47:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:订奶系统v1.zip




那个筛选的代码该如何写呀?

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


加好友 发短信
等级:小狐 帖子:311 积分:2288 威望:0 精华:0 注册:2011/9/22 10:21:00
  发帖心情 Post By:2017/9/15 16:28:00 [只看该作者]

请指教,主要我真的还是不会写,

 回到顶部
总数 13 1 2 下一页