求助，SQLGroupTableBuilder生成查询表后，如何对DataTable排序？以下是代码，谢谢老师！

Dim b As New SQLGroupTableBuilder("统计表_提案数","问题管理表")
b.C
b.Filter = "year(创建日期) = \'" & y & "\' And (状态 = \'生效\' or 状态 = \'批准\' or 状态 = \'退出\')"
b.Groups.AddDef("创建人")
b.Totals.AddDef("问题编号",AggregateEnum.Count,"记录数") \'根据不重复值列来统计记录数,也就是记录数
b.Build(False)

\'绘制柱状图
Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart = e.Form.Controls("Chart1") \' 引用窗口中的图表
Chart.DataSource = "统计表_提案数"

红色代码没起作用

Dim b As New SQLGroupTableBuilder("统计表_提案数","问题管理表")
b.C
b.Filter = "year(创建日期) = \'" & y & "\' And (状态 = \'生效\' or 状态 = \'批准\' or 状态 = \'退出\')"
b.Groups.AddDef("创建人")
b.Totals.AddDef("问题编号",AggregateEnum.Count,"记录数") \'根据不重复值列来统计记录数,也就是记录数
b.Build()

\'绘制柱状图
Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart = e.Form.Controls("Chart1") \' 引用窗口中的图表
Chart.DataSource = "统计表_提案数"

老师，不行的，我想到了，也试了。

Chart引用的是datatable, 不是table

老师，我把这个按钮的代码都贴上来，老师帮我看看问题在哪里，谢谢！

Dim y As String = e.Form.Controls("cbb_年度").Value
\'对后台数据进行统计
Dim b As New SQLGroupTableBuilder("统计表_提案数","问题管理表")
b.C
b.Filter = "year(创建日期) = \'" & y & "\' And (状态 = \'生效\' or 状态 = \'批准\' or 状态 = \'退出\')"
b.Groups.AddDef("创建人")
b.Totals.AddDef("问题编号",AggregateEnum.Count,"记录数") \'根据不重复值列来统计记录数,也就是记录数
b.Build(False)
MainTable = Tables("统计表_提案数")
Tables("统计表_提案数").Sort = "记录数 DESC"

\'绘制柱状图
Dim Chart As WinForm.Chart \'定义一个图表变量
Dim Series As WinForm.ChartSeries \'定义一个图系变量
Chart = e.Form.Controls("Chart1") \' 引用窗口中的图表
Chart.DataSource = "统计表_提案数"
Chart.SeriesList.Clear() \'清除图表原来的图系
Chart.VisualEffect = True
Chart.AxisX.ClearValueLabel
Chart.ChartType = ChartTypeEnum.Bar
Chart.HeaderFont = New Font("微软雅黑",18,FontStyle.Bold)
Chart.HeaderText = "提案数量排行榜 - " & y
Chart.LegendCompass = CompassEnum.South \'图例的位置
Chart.LegendFont = New Font("微软雅黑",10,FontStyle.Bold)
Chart.AxisX.AnnoRotation = 0 \'X轴标示逆时针旋转45度
Chart.AxisX.Font = New Font("微软雅黑",9,FontStyle.Bold)
Chart.LegendVisible = True \'显示图列
Chart.AxisX.AnnoWithLabels = True \'启用字符标示
Series = Chart.SeriesList.Add() \'增加一个图系
Series.Text = "提案人"
Series.X.DataField = "创建人" \'X轴绑定到产品列
Series.Y.DataField = "记录数" \'Y轴绑定到数量列
e.Form.Controls("Chart1").TopMost = True

结果：见附件

重复上传直到上传成功