以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  图表X轴代码怎么写  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=4030)

--  作者: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}"

--  作者:yangming
--  发布时间:2009/8/24 19:14:00
--  
加一个辅助列