我写了这样的程序,把表中的速度量变化曲线描述出来,可是结果出现了4根曲线,怎么回事呢?怎么样才能去掉那几根曲线呢?Private Sub Form_Load()
        Dim cn  As New ADODB.Connection
        Dim rs  As New ADODB.Recordset
        cn.ConnectionString = "provider=microsoft.jet.oledb.4.0;Data source=E:\测试4_new\MysampleDB.mdb"
        cn.Open
        rs.CursorLocation = adUseClient
        rs.Open "select *  from  表", cn, adOpenDynamic, adLockBatchOptimistic
                        
        With MSChart1
           .chartType = VtChChartType2dLine
           .TitleText = "速度变化图"
           .RowCount = rs.RecordCount           
           For i = 1 To rs.RecordCount
             .Row = i
             .data = rs("速度")
             .ColumnLabel = rs("速度")
            rs.MoveNext
            Next
         End With         End Sub