关于图表的数据标示,帮助文件说
ToolTipText一样,DataLabelText也可以使用各种代码
可以使用一些代码来标示数据,可使用的代码如下:
#XVAL: X值
#YVAL: Y值
#Y1VAL:
Y1值
#Y2VAL: Y2值
#Y3VAL: Y3值
#ISERIES: 图序编号
#IPOINT:
数据点编号
代码必须用大括号“{}”括起来。
但只是简单举了个
数据标示的方法:
Dim Chart As WinForm.Chart '定义一个图表变量
Dim Series As WinForm.ChartSeries '定义一个图系变量
Dim t
As Table = Tables("统计表1") '定义一个变量t引用数据表
Chart = e.Form.Controls("Chart1") ' 引用窗口中的图表
Chart.ChartType = ChartTypeEnum.Bar
'图表类型该为Bar(条形)
Chart.DataSource = "统计表1" '设置绑定表
Chart.SeriesList.Clear() '清除图表原来的图系
Series =
Chart.SeriesList.Add() '增加一个图系
Series.X.DataField = "产品" 'X轴绑定到产品列
Series.Y.DataField = "数量" 'Y轴绑定到数量列
Series.DataLabelText =
"{#YVAL}"
而[图示数据占比转换成百分比]这个常用的标示没有例子,于是狐友想方设法:
Series.DataLabelText = Format("{#YVAL}","#0.00%")
Series.DataLabelText = "{Format(#YVAL,""#0.00%"")}"
DataLabelText是可以用代码生成的,以下一例子,希望对大家有所启发.