Foxtable(狐表)用户栏目专家坐堂 → [求助]时间列分组统计


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

主题:[求助]时间列分组统计

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


加好友 发短信
等级:五尾狐 帖子:1140 积分:11255 威望:0 精华:0 注册:2017/9/26 16:30:00
[求助]时间列分组统计  发帖心情 Post By:2021/4/21 10:03:00 [只看该作者]

老师好!
我想把一天中的多个时间段统计到一行中,怎样设置?
谢谢!

Dim g As New GroupTableBuilder("统计表1", DataTables("练习日志"))
g.Groups.AddDef("练习时间", DateGroupEnum.none)
g.Groups.AddDef("练习数量")
g.Groups.AddDef("通过数量")
g.Groups.AddDef("未通过数量")
'g.VerticalTotal = True
g.Build()
DataTables("统计表1").DataCols.Add("通过率",Gettype(Double),"通过数量/练习数量")
DataTables("统计表1").DataCols("通过率").SetFormat("#0.00%")
DataTables("统计表1").DataCols("练习时间").SetDateTimeFormat(DateTimeFormatEnum.Datetime)
MainTable = Tables("统计表1")


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


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


加好友 发短信
等级:超级版主 帖子:107521 积分:546890 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/4/21 10:08:00 [只看该作者]

时间段指什么,最终是什么效果?

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


加好友 发短信
等级:五尾狐 帖子:1140 积分:11255 威望:0 精华:0 注册:2017/9/26 16:30:00
  发帖心情 Post By:2021/4/21 11:05:00 [只看该作者]

数据表中以[练习时间]datetime格式,记录每次的  通过数,未通过数,通过率。

在统计表中,[练习时间]显示为日期格式,当天的数据汇总。


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


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


加好友 发短信
等级:超级版主 帖子:107521 积分:546890 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/4/21 11:11:00 [只看该作者]

意思是按天分组?
g.Groups.AddDef("练习时间", DateGroupEnum.Day)

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


加好友 发短信
等级:五尾狐 帖子:1140 积分:11255 威望:0 精华:0 注册:2017/9/26 16:30:00
  发帖心情 Post By:2021/4/21 11:29:00 [只看该作者]

但是日期成数字了


图片点击可在新窗口打开查看此主题相关图片如下:截屏图片 (3).jpg
图片点击可在新窗口打开查看


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


加好友 发短信
等级:超级版主 帖子:107521 积分:546890 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/4/21 11:51:00 [只看该作者]

Dim g As New SQLGroupTableBuilder("统计表1","练习日志")
g.Groups.AddExp("练习时间","cstr(year(练习时间)) + '-' + cstr(Month(练习时间)) + '-' + cstr(day(练习时间)) ")


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


加好友 发短信
等级:五尾狐 帖子:1140 积分:11255 威望:0 精华:0 注册:2017/9/26 16:30:00
  发帖心情 Post By:2021/4/21 14:03:00 [只看该作者]

不识别cstr函数,怎么弄?

图片点击可在新窗口打开查看此主题相关图片如下:截屏图片 (4).jpg
图片点击可在新窗口打开查看

...
Dim g As New  SQLGroupTableBuilder("统计表1", "练习日志")
g.C '使用外部表,一定要设置数据源名称
g.Filter = Filter & " and " & "练习人 = 'xhw'"
g.Groups.AddExp("练习时间","cstr(year(练习时间)) + '-' + cstr(Month(练习时间)) + '-' + cstr(day(练习时间))")
'g.Groups.AddDef("星期")
g.Totals.AddDef("练习数量") 
g.Totals.AddDef("通过数量") 
g.Totals.AddDef("未通过数量") 
g.Totals.AddDef("通过率") 
g.Build()
MainTable = Tables("统计表1")

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


加好友 发短信
等级:超级版主 帖子:107521 积分:546890 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/4/21 14:09:00 [只看该作者]

SqlServer?

g.Groups.AddExp("练习时间","convert(nvarchar(10),练习时间,120)")

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


加好友 发短信
等级:五尾狐 帖子:1140 积分:11255 威望:0 精华:0 注册:2017/9/26 16:30:00
  发帖心情 Post By:2021/4/21 15:02:00 [只看该作者]

谢谢!

 回到顶部