第1个回答 2019-12-09
一个例子:
窗体上有一个按钮
一个能显示折线图的控件(我不大知道应该用哪个控件)
现有十二个数
设其为13-24
点击按钮时图片显示为一折线图
折线图为十二个点的连线
(1,13)(2,14)(3,15)(4,16)(5,17).....(12,24)
请教如何编写程序
回答:
控件用MsChart,在Microsoft
Chart
Control
6.0(OLEDB)。
Private
Sub
Form_Load()
Dim
CData(1
To
2,
1
To
24)
As
Variant
mctChart.chartType
=
VtChChartType2dLine
For
i=1
To
12
CData(1,i)=i
'1代表第一个数据
Next
i
For
i=13
To
24
'2代表第二个数据
CData(2,i)=i
Next
i
mctChart.ChartData
=
CData
End
Sub