27.1.2 图表控件的基本属性（3）

27.1.2  图表控件的基本属性（3）

8．设置控件的数据列

要设置控件中的当前数据列和数据列的总数，可以通过控件的Column属性和ColumnCount属性来完成。Column属性用于返回或设置数据网格中当前的数据列。ColumnCount属性用于返回或设置与图表关联的当前数据网格中的总列数。Column属性和ColumnCount属性的语法如下：

 
 
Object.Column[=Col]  
Object.ColumnCount[=Count] 

Column属性和ColumnCount属性的语法说明：

Col：取值为一个整型表达式，其值表示当前所操作的数据列。

Count：取值为一个整型表达式，其值表示图表中的总列数。

下面代码将设置控件对象MSChart1中总的列数设置为3、当前列设置1，其代码如下：

 
 
MSChart1.ColumnCount=3                  '总的列数  
MSChart1.Column=1                       '当前列 

说明：Column属性主要用来设置当前列的标签。

9．设置控件的列标签

设置控件中有关图表的列标签可以通过控件的ColumnLabel属性、ColumnLabelCount属性、ColumnLabelIndex属性来设置。ColumnLabel属性用于返回或设置与图表数据网格中的列关联的标签文本。ColumnLabelCount属性用于返回或设置与图表关联的数据网格中的列的标签级别数。ColumnLabelIndex属性用于返回或设置与图表关联的特定列标签的级别。ColumnLabel属性、ColumnLabelCount属性、ColumnLabelIndex属性的语法如下：

 
 
Object.ColumnLabel[=Text]  
object.ColumnLabelCount[=Count]  
Object.ColumnLabelIndex[=Index] 

ColumnLabel属性的语法说明：

Text：取值为一个字符串表达式，其值表示与数据网格中的列相关联的标签文本。

Count：取值为一个整型表达式，其值表示列标签级别数。此属性以添加或删除数据网格列上的标签级别。

Index：取值为一个整型表达式，其值用来标识列标签级别。

下面代码将设置控件对象MSChart1中第3列的列标签为"教育"，其代码如下：

 
 
MSChart1.ColumnLabelIndex =3                '设置当前操作的列  
MSChart1.ColumnLabel ="教育"              '当前列的标题 

10．当前数据点

设置控件中显示图表的数据，可以通过控件的Data属性来指定。Data属性用于返回或设置被插入图表数据网格中的当前数据点的数值。Data属性的语法如下：

 
 
Object.Data[=Value] 

Value参数取值为一个整型表表达方式，其取值表示数据点数值。如果当前数据点已经包含数据，则新数据将代替原有数据。控件则会重新绘制图表以反映当前数据点的新数值。

下面代码将设置控件对象MSChart1第一列、第二行的值，其值来源于数组myData中对应的数组元素值赋给控件中的当前数据点，其代码如下：

 
 
MSChart1.Column = 1             '设置当前操作的列  
MSChart1.Row = 2                '设置当前操作的行  
MSChart1.Data=myData(2,1)       '第一行第二列的数据 

11．设置控件中图表的光标

设置鼠标经过控件中的图表区是否显示光标，可通过控件的DoSetCursor属性来设置。DoSetCursor属性用于返回或设置一个数值，它指示图表是否能设置光标。DoSetCursor属性的语法如下：

 
 
Object.DoSetCursor[=Boolean] 

Boolean参数取值为一个布尔表达式，其值用来指定是否使用自定义文本，其常用取值为True或False。如果取值为True表示应用程序可控制鼠标指针的外观。如果取值为False表示应用程序不能控制鼠标指针的外观。系统默认取值为True。DoSetCursor属性决定应用程序是否能够控制鼠标指针的外观。

12．设置控件中图表的脚注

要设置控件中图表的脚注信息可以能过控件的Footnote属性、FootnoteText属性来设置，Footnote属性用于返回对Footnote对象的引用，它提供注释图表所用描述文字信息。FootnoteText属性用于返回或设置用作脚注的文本。Footnote属性、FootnoteText属性的语法如下：

 
 
Object.Footnote  
Object.FootnoteText[=Text] 

Text参数取值为一个字符串表达式，其值用来指定脚注信息。下面将设置控件对象MSChart1中图表的脚注设置成"说明：第一季度销售额××万元、第二季度销售额为××万元、平均销售额为××万元"，代码如下：

MSChart1.FootnoteText =" 说明：第一季度销售额××万元、第二季度销售额为××万元、平均销售额为××万元"

还可以设置脚注的字体样式、颜色、大小等。