主题：再述图表问题,给大家添麻烦了.望高人指点

此主题相关图片如下：错误提示1.jpg

具体代码：

Dim Chart As WinForm.Chart '定义一个图表变量
Dim Series As WinForm.ChartSeries '定义一个图系变量
Dim t As Table = Tables("库存表") '定义一个变量t引用数据表
Chart= e.Form.Controls("Chart1") ' 引用窗口中的图表
Chart.SeriesList.Clear() '清除图表原来的图系
Series = Chart.SeriesList.Add() '增加一个图系
Series.Length = t.Rows.Count '图系的数据点数等于表的行数
For i As Integer = 0 To t.Rows.Count - 1 '指定每个数据点的位置
    Series.X(i) = t.Rows(i)("月份") '指定水平坐标
    Series.Y(i) = t.Rows(i)("数量") '指定垂直坐标
Next

---------------------------

 

此主题相关图片如下：错误提示2.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轴绑定到月份列
Series.Y.DataField = "数量" 'Y轴绑定到数量列

 

都按照帮助中的代码写的，怎么总会提示日期错误呢？另外对X轴，Y轴，Y2轴的数据标示怎么老显不出来呢？具体图形和代码如下。

 
此主题相关图片如下：数据标示.jpg

 

Dim Chart As WinForm.Chart '定义一个图表变量
Dim Series As WinForm.ChartSeries '定义一个图系变量
Chart = e.Form.Controls("Chart1") ' 引用窗口中的图表
Chart.VisualEffect = True '加上这一行,让你的图表更漂亮
Chart.ChartType = ChartTypeEnum.xyplot '图表1类型该为Bar(条形)
Chart.ChartType2 = ChartTypeEnum.XYPlot '图表2类型该为线形
Chart.DataSource = "库存表" '设置绑定表
Chart.SeriesList.Clear() '清除图表原来的图系
Series = Chart.SeriesList.Add() '给图表1增加一个图系
Series = Chart.SeriesList.Add() '增加一个图系
series.marksize= 2 '数据标记点的大小
Series.TooltipText = "产品名称 = {#XVAL}, 件数 = {#YVAL},金额 = {#YVAL}"
Series.Text = "件数"
Series.X.DataField = "产品名称" 'X轴绑定到产品列
Series.Y.DataField = "件数" 'Y轴绑定到数量列
Series.Y1.DataField = "件数" 'Y轴绑定到数量列

Chart.SeriesList2.Clear() '清除图表原来的图系
Series = Chart.SeriesList2.Add() '给图表2增加一个图系
series.marksize= 2 '数据标记点的大小
Series.Text = "金额(元)"
Series.X.DataField = "产品名称" 'X轴绑定到产品列
Series.Y.DataField = "金额" 'Y轴绑定到数量列
Chart.LegendVisible = True '显示图列
Chart.LegendCompass= CompassEnum.South '图列显示在南方(底端)
Chart.AxisX.Text = "月份"
Chart.AxisY.Text = "件数"
Chart.AxisY2.Text = "金额"

Chart.BarClusterWidth = 10
Chart.BarClusterWidth2 = 10
Chart.AxisX.AnnoRotation = - 45 'X轴标示逆时针旋转45度
Chart.PrintWidth = 180
Chart.PrintHeight = 150
Series.TooltipText = "产品名称 = {#IPOINT}, 件数 = {#XVAL}, 金额 = {#YVAL} "

 

你要做一个简单的例子传上来，并说明问题，大家才好测试的。