- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- 图表统计日期统计 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=178696)
-- 发布时间：2022/7/16 11:32:00
-- 图表统计日期统计
我需要两个统计表一个是按照月份统计，一个按照加工厂分类统计
老师我需要两个图表统计，在论坛找了没找到类似的案例，老师帮忙指导一下，谢谢
-- 发布时间：2022/7/16 11:38:00
--
-- 发布时间：2022/7/18 7:59:00
--
Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart= Forms("窗口1").Controls("Chart1") \' 引用窗口中的图表
Chart.ChartType = ChartTypeEnum.Bar \'图表类型该为Bar(条形)
Chart.DataSource = "统计表1" \'设置绑定表
Chart.AxisX.DateType = True \'X轴是日期型
Chart.AxisX.AnnoFormatString = "dd" \'只显示日
Chart.SeriesList.Clear() \'清除图表原来的图系
Series = Chart.SeriesList.Add() \'增加一个图系
Series.X.DataField = "月份" \'X轴绑定到产品列
Series.Y.DataField = "数量" \'Y轴绑定到数量列
老师帮我看看怎么出现有个31，我按月统计-- 发布时间：2022/7/18 8:35:00
--
应该是月份列有个值计算，或者录入错了
-- 发布时间：2022/7/18 8:41:00
--
Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart= Forms("窗口1").Controls("Chart1") \' 引用窗口中的图表
Chart.ChartType = ChartTypeEnum.Bar \'图表类型该为Bar(条形)
Chart.DataSource = "统计表1" \'设置绑定表
Chart.AxisX.DateType = True \'X轴是日期型
Chart.AxisX.AnnoFormatString = "dd" \'只显示日
Chart.SeriesList.Clear() \'清除图表原来的图系
Series = Chart.SeriesList.Add() \'增加一个图系
Series.X.DataField = "月份" \'X轴绑定到产品列
Series.Y.DataField = "数量" \'Y轴绑定到数量列
-- 发布时间：2022/7/19 16:18:00
--
老师能否不通过按钮的Click事件代码设置，能否在其它事件代码每次打开软件自动显示图表，谢谢
-- 发布时间：2022/7/19 16:20:00
--
放到窗口afterload事件
-- 发布时间：2022/7/19 16:27:00
--
谢谢老师