以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]柱状图表的横坐标排序  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83770)

--  作者:hotday1972
--  发布时间:2016/4/16 11:16:00
--  [求助]柱状图表的横坐标排序

以下代码:

Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Dim tbl As DataTable = DataTables("FR问题表") \'定义一个变量tbl引用数据表
Dim lst As List(Of String) = tbl.GetValues("问题分类") \'获得产品名称集合
Chart = e.Form.Controls("Chart1") \' 引用窗口中的图表
Chart.ChartType = ChartTypeEnum.Bar \'设置图表类型
Chart.SeriesList.Clear() \'清除图表原来的图系
Series = Chart.SeriesList.Add() \'增加一个图系
Series.Length = lst.Count \'设置图系的长度
For i As Integer = 0 To lst.Count - 1 \'指定每个数据点的位置
    Series.X(i) = i \'指定水平坐标
    Series.Y(i) = tbl.Compute("Count(跟踪号)","[问题分类] = \'" & lst(i) & "\'") \'指定垂直坐标
    Chart.AxisX.SetValueLabel(i, lst(i)) \'指定字符表示
Next
Chart.AxisX.AnnoWithLabels = True \'启用字符标示

 

请问如何给Y轴的数据点按统计值的大小来排序?

 

谢谢!

[此贴子已经被作者于2016/4/16 13:05:01编辑过]

--  作者:hotday1972
--  发布时间:2016/4/16 13:05:00
--  
有帮忙的么?谢谢
--  作者:Hyphen
--  发布时间:2016/4/16 15:30:00
--  
先获取所有的统计值,排好序,再生成图表

不懂就上传例子测试

--  作者:hotday1972
--  发布时间:2016/4/16 21:37:00
--  
谢谢,只能一个数据点数据点的Load了。谢谢。