以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  排序生成图表  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=82477)

--  作者:一笑
--  发布时间:2016/3/18 15:32:00
--  排序生成图表

统计表1对完成量进行了统计,绑定图表,现在想按已完成量升序生成图表,试了试Tables("统计表1").sort = "已完成量",代码不起作用,求解

另外要设置表中文字的字体和大小改如何写代码,谢谢


Dim g As New GroupTableBuilder("统计表1", DataTables("ISM"))

g.Groups.AddDef("完成人")

g.Totals.AddDef("完成", AggregateEnum.Count,"已完成量")

g.Build()

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" \'设置绑定表

Tables("统计表1").sort = "已完成量"


Series = Chart.SeriesList.Add() \'增加一个图系

Series.X.DataField = "完成人" \'X轴绑定到月份列

Series.Y.DataField = "已完成量" \'Y轴绑定到数量列

Series.DataLabelText = "{#YVAL}"

Series.Text = "个人完成数量"


--  作者:狐狸爸爸
--  发布时间:2016/3/18 16:28:00
--  

不要用绑定,直接编码逐个增加数据点,参考这里的方法一:

http://www.foxtable.com/help/topics/0967.htm

 

这样如何排序,完全由你决定。

 

[此贴子已经被作者于2016/3/18 16:28:08编辑过]