列能否自动排序？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

表A1

车牌照入口站号

：

车牌照有上万条记录，（车牌照记录有重复值，如同一台车有时广州上，有时番禺上）入口站名有几百条

用以下代码，分析车辆入口次数：

MainTable = Tables("表A1")

Dim g As New CrossTableBuilder("单车入口站统计", DataTables("表A1"))

g.HGroups.AddDef("车牌照")

g.VGroups.AddDef("入口站名")

g.Totals.AddDef("入口站号", AggregateEnum.Count, "入口站号")

g.HorizontalTotal = True

g.VerticalTotal = True

g.Decimals = 2

g.Build()

MainTable = Tables("单车入口站统计")

CurrentTable.Cols.Frozen = 1

Tables("单车入口站统计").AutoSizeCols()

请教老师：能否通过代码控制【单车入口站统计】表，使该表的列从左到右，列合计值最多的排在最左，依次往右排。

主题：列能否自动排序？