Foxtable(狐表)用户栏目专家坐堂 → [分享]图示数据占比转换成百分比!


  共有14937人关注过本帖树形打印复制链接

主题:[分享]图示数据占比转换成百分比!

帅哥哟,离线,有人找我吗?
ybil
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:521 积分:4910 威望:0 精华:7 注册:2008/9/2 22:22:00
[分享]图示数据占比转换成百分比!  发帖心情 Post By:2011/7/15 17:22:00 [显示全部帖子]

关于图表的数据标示,帮助文件说

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是可以用代码生成的,以下一例子,希望对大家有所启发.
 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:ts.table



[本帖被加为精华]
 回到顶部