Question

请问在VB6中该如何画多条曲线呢

请教下，我现在使用VB6的MSchart控件，想画多条xy形式的曲线（以两条为例），数据源为一个三列的数组dat,第一列为x值，第二列和第三列为y1和y2.请问该怎么画呢？
直接MsChart1.ChartData =dat得到的结果为x,y1,y2三条曲线，并且横轴标签为字符并非x的值。
VB6中貌似并没有VB.net中类似Series的设置，请问该怎么设置呢？？？
万分感谢！！！

http://zhidao.baidu.com/question/1669168964736401387.html

Answer 1

Private Sub Form_Load()
MSChart1.chartType = VtChChartType2dLine

Dim arrValues()
ReDim arrValues(1 To 5, 1 To 6)
Dim i As Integer
For i = 1 To 5
   arrValues(i, 1) = "t" & i 'x轴
   arrValues(i, 2) = 0 + Rnd * 100 '第一条线
   arrValues(i, 3) = 0 + Rnd * 100 '第二条线
   arrValues(i, 4) = 0 + Rnd * 100 '第三条线
   arrValues(i, 5) = 0 + Rnd * 100 '第四条线
   arrValues(i, 6) = 0 + Rnd * 100 '第五条线

Next i
MSChart1.ChartData = arrValues