主题：生成的柱形图表,标示错误,哪里错了?

Dim Chart As WinForm.Chart '定义一个图表变量

Dim Series As WinForm.ChartSeries '定义一个图系变量

Chart= e.Form.Controls("Chart1") ' 引用窗口中的图表

Chart.ChartType = ChartTypeEnum.Bar '设置图表类型

Chart.SeriesList.Clear() '清除图表原来的图系

For n As Integer = e.Form.Controls("ComboBox1").text  To e.Form.Controls("ComboBox2").text

    Series = Chart.SeriesList.Add() '增加一个图系

    Series.Length = 13         '图系的数据点数等于表的行数

    Series.DataLabelText = "{#YVAL}"

    Series.DataLabelCompass=LabelCompassEnum.North

    

    For i As Integer = 1 To 12'指定每个数据点的位置

        Series.X(i) = i     '指定水平坐标 月份

        Dim r As DataRow = DataTables("qmdkye").Find("数据日期 = " & n & Format(i,"00"))

        If r IsNot Nothing

            Series.Y(i) = r("贷款逾期率") '指定垂直坐标

        Else

            Series.Y(i) = 0

        End If

    Next

    '设置了每个图系的标题:

    Series.Text =N &"年"

Next

'在指定的位置显示图例:

Chart.LegendVisible = True '显示图列

Chart.LegendCompass= CompassEnum.South '图列显示在南方(底端)

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:折线图.foxdb