-- 作者:chenwuwenyu
-- 发布时间:2009/8/24 18:52:00
-- 图表X轴代码怎么写
Dim g As New GroupTableBuilder("统计表1", DataTables("表A")) g.Groups.AddDef("日期", DateGroupEnum.Year, "年") g.Groups.AddDef("日期", "月") g.Totals.AddDef("金额") g.Build() MainTable = Tables("统计表1") 以年月分组统计 问题是如果让图表的X轴,显示“年+月”
此主题相关图片如下:未命名.jpg
Dim Chart As WinForm.Chart \'定义一个图表变量 Dim Series As WinForm.ChartSeries \'定义一个图系变量 Chart= e.Form.Controls("Chart1") \' 引用窗口中的图表 Chart.DataSource = "销售统计表" \'设置绑定表 Chart.SeriesList.Clear() \'清除图表原来的图系 Series = Chart.SeriesList.Add() \'增加一个图系
Series.X.DataField = "X" \'X轴绑定到月份列
Series.Y.DataField = "Y" \'Y轴绑定到数量列 Series.DataLabelText = "{#YVAL}"
|