0

我试图将 Telerik 图表与下面的代码绑定，然后根据屏幕截图它正在考虑一个错误。

任何人都知道如何处理这个错误。

逻辑解释：我将数据表分配为listdata数据源并尝试根据表行数绑定数据。 

Dim listdata As new DataList 
        listdata.DataSource   = ds.Tables.Item(0)

        BaselineRadChart.Clear()    
        Dim chartSeries As New ChartSeries("Baseline", ChartSeriesType.Line) 
            chartSeries.Appearance.ShowLabels = False
            Dim i As Integer = 0
            While i < ds.Tables(0).Rows.Count
                chartSeries.AddItem(New ChartSeriesItem(listData[i].x, listData[i].y))
                i = i + 1
            End While  

            BaselineRadChart.AddChartSeries(chartSeries)
            BaselineRadChart.ChartTitle.TextBlock.Text = title
            BaselineRadChart.PlotArea.XAxis.AxisLabel.TextBlock.Text = xaxislableName
            BaselineRadChart.PlotArea.XAxis.AxisLabel.Visible = True
            BaselineRadChart.PlotArea.XAxis.IsZeroBased = False
            BaselineRadChart.PlotArea.YAxis.AxisLabel.TextBlock.Text = yaxislableName
            BaselineRadChart.PlotArea.YAxis.AxisLabel.Visible = True
            BaselineRadChart.PlotArea.YAxis.IsZeroBased = True

我试图通过使用下面的参考代码来开发上面的代码（bcz我们相同的功能，如果下面的代码有效，那么我的代码肯定有效）。它正在为他工作。

ChartSeries chartSeries = new ChartSeries("Altitude", ChartSeriesType.Line); 
chartSeries.Appearance.ShowLabels = false; 
incrementCount = 1; 

for (int i = 0; i < listData.Count; i = i + incrementCount) 
    {
        chartSeries.AddItem(new ChartSeriesItem(listData[i].x, listData[i].y)); 
    }

RadChart2.AddChartSeries(chartSeries);
RadChart2.ChartTitle.TextBlock.Text = title;
RadChart2.PlotArea.XAxis.AxisLabel.TextBlock.Text = 
"Distance (Miles)"; 
RadChart2.PlotArea.XAxis.AxisLabel.Visible = true; 
RadChart2.PlotArea.XAxis.IsZeroBased = true; 
RadChart2.PlotArea.YAxis.AxisLabel.TextBlock.Text = yAxisLabel;
RadChart2.PlotArea.YAxis.AxisLabel.Visible = true; 
RadChart2.PlotArea.YAxis.IsZeroBased = false;

在此处输入图像描述

4

1 回答 1

0

您不是要从表中提取数据吗？

While i < ds.Tables(0).Rows.Count
    chartSeries.AddItem(New ChartSeriesItem(_
        ds.Tables(0).Rows(i)("x"), ds.Tables(0).Rows(i)("y")))
    '               ^^^^^^^^^^^^^ get from the tabel
    i = i + 1
End While
于 2012-04-27T17:57:00.993 回答