vb 图表控件mschart 的用法小结
- 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。
1 图表控件的加载
图表控件不属于标准控件,使用时需要加到工具箱。加入图表控件的方法是:在集成开发环境中,单击“工程”的“部件”,选择列表中的Microsoft Chart Control 6.0(OLEDB)即可。
加入到工具箱之后,加载图表控件到窗体就和加载标准控件的方法一样。
2 图表控件的属性
在属性窗口,也可以用代码,设置图表控件的属性。
1.RowCount属性
设置作图数据的行数。
2.ColumnCount属性
设置作图数据的列数。
3.TitleText属性
设置图题。
4.RowLabelCount属性
设置行标的个数。
5.RowLabel属性
设置行标。
6.ColumnLabelCount属性
设置列标的个数。
7.ColumnLabel属性
设置列标。
8.Row属性
设置当前行。
9.Column属性
设置当前列。
10.AutoIncrement属性
如果数据是连续存放的,将AutoIncrement属性设为True,可以不用随时设置当前行和当前列,向图表控件提供数据时可以连续进行。
11.ShowLagend属性
设置为True时可以显示图例。
3 图表控件的类型
图表控件可以绘制12种统计图形,设定图表控件的ChartType属性可以决定图表类型。见表4-1。
表4-1 图表控件的ChartType属性
常量 值 图表类型
VtChChartType3dBar 0 3维条形图
VtChChartType2dBar 1 2维条形图
VtChChartType3dLine 2 3维折线图
VtChChartType2dLine 3 2维折线图
VtChChartType3dArea 4 3维域型图
VtChChartType2dArea 5 2维域型图
VtChChartType3dStep 6 3维阶梯图
VtChChartType2dStep 7 2维阶梯图
VtChChartType3dCombination 8 3维联合图
VtChChartType2dCombination 9 2维联合图
VtChChartType2dPie 14 2维饼形图
VtChChartType2dXY 16 2维坐标图
4 图表控件的数据
只有图表控件取得数据才有可能显示数据。图表控件的数据是存放在内置的数据网格内。图表控件数据网格取得数据的方法有:
1.使用Data属性
图表数据可以保存在图表控件的Data属性中。Data属性只能存储数字型的数据,而不能保存文本。在对Data属性赋值前,必须先设置RowCount属性和ColumnCount属性来提供数据的行数和列数,系统根据行数和列数安排Data的大小。
在向Data属性赋值时,还需要指明当前行和当前列。例如,
MSChart1.Row = 3
MSChart1.Column = 5
MSChart1.Data = XYZ
是将XYZ赋予Data的第3行第5列。
如果数据是连续存放的,并将AutoIncrement属性设为True,可以不用随时设置当前行和当前列。例如,
MSChart1.Data = X(1)
MSChart1.Data = X(2)
MSChart1.Data = X(3)
2.使用ChartData属性
ChartData属性既可以存放数字型数据,也可以存放文本型数据。例如,
Dim vntX(1 To 4) As Variant
vntX(1) = “产量”
vntX(2) = 200
vntX(3) = 300
vntX(4) = 400
MSChart1.ChartData = X
“产量”将标示在所绘制图形的X轴上。
3.使用SetData方法
格式是:
MSChart1.DataGrid.SetData 行,列,数值,nullFlag
“数值”为双精度。nullFlag指明数据点是否为空。
本章所开发的绘制图表应用程序使用SetData方法向图表对象添加数据。
4.图题、行标和列标
对图题、行标示和列标示的赋值分两种情况:
(1)使用Data属性和SetData方法
?图题的赋值使用TitleText属性。
?行标示或列标示的赋值先设置当前行或当前列,然后使用RowLabel属性或ColumnLabel属性。例如,
MSChart1.Row = 1
MSChart1.RowLabel = “A”
(2)使用ChartData属性
假定用图表控件表示一个2维数据,作图时使用MSChart1.ChartData = vntX。现在我们看一看vntX是如何形成的。
Dim vntX(1 To 3, 1 To 4) As Variant
vntX(1,1) = “产品质量逐年变化表” 图题放在vnt(1,1)
vntX(1,2) = ”1级” 列标放在第1行
vntX(1,3) = ”2级”
vntX(1,4) = ”3级”
vntX(2,1) = “1999年” 行标放在第1列
vntX(2,2) = 100 1级品数量
vntX(2,3) = 200 2级品数量
vntX(2,4) = 300 3级品数量
vntX(3,1) = “2000年” 行标放在第1列
vntX(3,2) = 300 1级品数量
vntX(3,3) = 200 2级品数量
vntX(3,4) = 100