如何用mschart实现这样的折线图?

比如本年的各月销售为一个系列
去年的各月销售为另一个系列
在同一图上显示两个折线
这个数组怎么赋值亚

解决方案 »

  1.   

    ' 系列的数目是由第二个维数决定的。
    ' 在本例中，图表将有两个系列，
    ' 每个系列有12个数据点。
    Dim arrSalesQuantity(1 to 12, 1 to 2)
    Dim i as Integer
    For i = 1 to 12
       arrSalesQuantity(i, 1) = lastyear(i)     ' Series 1
       arrSalesQuantity(i, 2) = thisyear(i)     ' Series 2
    Next i
    MsChart1.ChartData = arrSalesQuantity
      

  2.   

    还有啊,坐标上的label如何改变呀,怎么总是C1,R1的?