交叉统计时用周的方式统计如何让周一变成每周的第一天 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 交叉统计时用周的方式统计如何让周一变成每周的第一天

共有3219人关注过本帖树形打印复制链接主题：交叉统计时用周的方式统计如何让周一变成每周的第一天

xby407

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：婴狐帖子：1 积分：94 威望：0 精华：0 注册：2021/2/1 8:26:00

交叉统计时用周的方式统计如何让周一变成每周的第一天 发帖心情

Post By：2021/2/21 22:14:00 [只看该作者]

用周进行交叉统计时，自动显示周日为第一天，如何让周一成为每周的第一天？

交叉统计代码如下：

Dim g As New CrossTableBuilder("QQ群早起打卡交叉统计", DataTables("QQ群早起打卡统计"))

g.HGroups.AddDef("QQ号")

g.HGroups.AddDef("提交者")

g.VGroups.AddDef("提交日期", DateGroupEnum.Week, "2021年第{0}周得分")

g.VGroups.AddDef("提交日期", DateGroupEnum.Day, "{0}日")

g.Totals.AddDef("得分", "得分")

g.HorizontalTotal = True

g.Build()

MainTable = Tables("QQ群早起打卡交叉统计")

有点蓝

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：超级版主帖子：110738 积分：563610 威望：0 精华：9 注册：2015/6/24 9:21:00

Post By：2021/2/21 22:37:00 [只看该作者]

使用SQL处理

dim sql as string = "select QQ号,提交者,case when DatePart(weekday,提交日期) = 1 then DatePart(week,提交日期) -1 else DatePart(week,提交日期) end AS [周次],提交日期,得分 from {QQ群早起打卡统计}"

Dim g As New CrossTableBuilder("QQ群早起打卡交叉统计", sql，“数据源名称”)