[求助]交叉统计 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以下是引用nblwar在2012-9-7 20:29:00的发言：

例子非常简单，就是两个结构一样的表，一个表输入熔铸编号，就会自动引用另一个表该熔铸编号的相关记录，两个表的代码也只有这个代码，在我自己电脑上没什么问题，可是在公司古董上面运行就超慢

帖子发错地方了吧....

列名排序小例：

Dim t As Table = Tables("统计表1")
For i As Integer = 0 To t.Cols.Count - 1
    Dim k As Integer = i
    For j As Integer = i + 1 To t.Cols.Count - 1
        If t.Cols(i).Name < t.Cols(j).Name Then
            k = j
        End If
    Next
    t.Cols(k).Move(i)
Next

[此贴子已经被作者于2012-9-7 20:39:09编辑过]

主题：[求助]交叉统计