Dim Chart As WinForm.Chart '定义一个图表变量
Dim Series As WinForm.ChartSeries '定义一个图系变量
Chart = e.Form.Controls("Chart1") ' 引用窗口中的图表
Chart.ChartType = ChartTypeEnum.Bar '设置图表类型
Chart.SeriesList.Clear
Chart.AxisX.ClearValueLabel
Chart.AxisY.ClearValueLabel
Chart.DataSource = "年龄区间统计表" '设置绑定表
Series = Chart.SeriesList.Add() '增加一个图系
Series.Text = "年龄" '设置图系的标题
Series.X.DataField = "年龄区间" 'X轴绑定到产品列
Series.Y.DataField = "人数" 'Y轴绑定到数量列
Chart.AxisX.AnnoRotation = - 45 'X轴标示逆时针旋转45度
Series.DataLabelText = "{#YVAL}" '显示Y轴数据
series.DataLabelCompass = LabelCompassEnum.North
Chart.AxisY.Text = " 人数(人)"
Chart.AxisX.Text = " 年龄(岁)"
Chart.HeaderText="年龄结构统计图"
Chart.LegendVisible = False '显示图列