Foxtable(狐表)用户栏目专家坐堂 → 交叉统计表可不可以让“年”和“月”归入一列


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

主题:交叉统计表可不可以让“年”和“月”归入一列

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


加好友 发短信
等级:婴狐 帖子:66 积分:569 威望:0 精华:0 注册:2016/8/4 15:18:00
交叉统计表可不可以让“年”和“月”归入一列  发帖心情 Post By:2016/9/19 18:58:00 [显示全部帖子]

现在交叉统计表是这样的:

 


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

能不能让“年”和“月”归入一列,比如归入“日期”列,列值:201X年X月,以便基于此表建立图表。


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


加好友 发短信
等级:婴狐 帖子:66 积分:569 威望:0 精华:0 注册:2016/8/4 15:18:00
  发帖心情 Post By:2016/9/23 23:58:00 [显示全部帖子]

能不能直接生成分组统统计表?

我在详细说一下我的问题,有学生信息表(ID,姓名,性别,入校时间,联系电话……),我想建立一个分组统计表:表C,统计每月入校的学生人数。表C的列有:来校时间(xx年X月),入校人数。其中入校时间格式为“20XX年X月”。请问代码如何写?


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


加好友 发短信
等级:婴狐 帖子:66 积分:569 威望:0 精华:0 注册:2016/8/4 15:18:00
  发帖心情 Post By:2016/9/24 17:46:00 [显示全部帖子]

还是没弄成。

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar

我想达成的目的,一是生成招生统计表,可以看到每月入校的人数。二是生成图表,以图表的形式看到每月的招生人数。如下图的样子。

 

 


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

 


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

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


加好友 发短信
等级:婴狐 帖子:66 积分:569 威望:0 精华:0 注册:2016/8/4 15:18:00
  发帖心情 Post By:2016/9/24 19:58:00 [显示全部帖子]

谢谢老师!解决了。

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


加好友 发短信
等级:婴狐 帖子:66 积分:569 威望:0 精华:0 注册:2016/8/4 15:18:00
  发帖心情 Post By:2016/9/25 14:37:00 [显示全部帖子]

请问老师,我的那个表是由access外部数据表,通过查询条件生成的查询表。再基于这个查询表进行统计的。所以,代码是不是不一样呢?代码运行提示出错。

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


加好友 发短信
等级:婴狐 帖子:66 积分:569 威望:0 精华:0 注册:2016/8/4 15:18:00
  发帖心情 Post By:2016/9/25 17:22:00 [显示全部帖子]

老师再帮看看吧,外部数据源名称都对,数据表名称也都对。“来校时间”列名也对。还是存在错误。


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


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


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

 目前代码是这样的:

 

Dim b As New SQLGroupTableBuilder("统计表1","学生信息表")
b.C
b.Groups.AddExp("时间","cstr(Year([来校时间])) + '年' + cstr(Month([来校时间])) + '月'")
b.Totals.AddDef("_Identify",AggregateEnum.Count,"人数") '添加数量列用于统计
Tables("窗口1_Table1").DataSource = b.BuildDataSource()

Dim Chart  As WinForm.Chart  '定义一个图表变量
Dim Series As WinForm.ChartSeries '定义一个图系变量
Chart = e.Form.Controls("Chart1") ' 引用窗口中的图表
Chart.DataSource = "窗口1_Table1" '设置绑定表
Chart.SeriesList.Clear() '清除图表原来的图系
Chart.AxisY.Min = 0
Series = Chart.SeriesList.Add() '增加一个图系
Series.X.DataField = "时间" 'X轴绑定到产品列
Series.Y.DataField = "人数" 'Y轴绑定到数量列


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


加好友 发短信
等级:婴狐 帖子:66 积分:569 威望:0 精华:0 注册:2016/8/4 15:18:00
回复:(狐狸爸爸)你需要将文件和数据发上来,别人才...  发帖心情 Post By:2016/9/26 20:59:00 [显示全部帖子]

老师,将文件传上来了,里面的那个access数据库就是外部数据。在您的文件上加的表。谢谢啦。

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目297.rar

 


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


加好友 发短信
等级:婴狐 帖子:66 积分:569 威望:0 精华:0 注册:2016/8/4 15:18:00
  发帖心情 Post By:2016/9/26 22:31:00 [显示全部帖子]

谢谢老师们!!问题解决了!!!问题在我这儿!!


 回到顶部