Area
Area(面积)型和线形非常相似,差别是线条和X轴之间的区域会被填充,而且新的图系绘制在之前图系之上。
例如:
Dim
Chart
As WinForm.Chart
'定义一个图表变量
Dim Series As
WinForm.ChartSeries '定义一个图系变量
Chart= Forms("窗口1").Controls("Chart1")
' 引用窗口中的图表
Chart.ChartType = ChartTypeEnum.Area
'图表类型改为Area
Chart.SeriesList.Clear() '清除图表原来的图系
For n As
Integer =
0
To
1
Series = Chart.SeriesList.Add()
'增加一个图系
Series.Length = 10
'图系包括10个数据点
For
i As
Integer =
0
to
9
'指定每个数据点的位置
Series.X(i) = i
'指定水平坐标
Series.Y(i) = i *
2 + Rand.Next(5)
'垂直坐标用随机数生成
Next
Next
生成的图表为:
本页地址:http://www.foxtable.com/webhelp/topics/0973.htm