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

Dim lst As new List(of String())

lst.Add(new String(){"1","2","3"})

lst.Add(new String(){"a","a","a"})

lst.Add(new String(){"8","8","8"})

lst.Add(new String(){"6","6","3"})

Dim dtb As New DataTableBuilder("A")

dtb.AddDef("A", Gettype(String), 32)

dtb.AddDef("B", Gettype(String), 32)

dtb.AddDef("C", Gettype(String), 32)

Dim t As DataTable = dtb.Build(True)

Dim dr As DataRow

For Each sarr As String() In lst

dr = t.AddNew

For i As Integer = 0 To sarr.Length - 1

dr(t.DataCols(i).Name) = sarr(i)

lst.Clear

Dim drs As List(Of DataRow) = t.Select("","A")

Dim lls As new List(of String)

For Each r As DataRow In drs

lls.Clear

For i As Integer = 0 To t.DataCols.Count - 1

lls.Add(r(t.DataCols(i)))

lst.Add(lls.ToArray)

For Each sarr As String() In lst

Output.Show(sarr(0) & "-" & sarr(1) & "-" & sarr(2))