Question

VB6的MSchart控件中如何画多条曲线

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

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

追问

你好，这种图我倒是知道，我想画的线横坐标是x轴，而不是图中的字符标签形式，并且x值的间隔并不连续。
比如我要y1=sinx,y2=cosx两条线，x值为{1,2,4,9,12,13}
还请多多帮忙

追答

:)