主题：统计排序

不行，交叉统计无法指定排序，如果要处理，就必须生成以后，写一段代码移动列。

具体，你上次foxtable例子。

不然，你就要用代码实现交叉统计功能

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

If e.Form.Controls("学期").Value IsNot Nothing Then
 

    Tables("课时统计_Table1").DataSource = b.BuildDataSource()
    Dim dic As new Dictionary(Of String, String)
    For Each c As Col In Tables("课时统计_Table1").Cols
        dic.add(c.Caption, c.name)
    Next
    Dim str As String = "语文,数学,英语,科学,历史"
    Dim ary() As String = str.split(",")
    For i As Integer = ary.length-1 To 0 Step -1
        Tables("课时统计_Table1").Cols(dic(ary(i))).Move(2)
    Next
End If