主题：出个题目 反正我这一下子是没解决.【解决了】

C#支持匿名方法，所以写起来代码比较省事

VB 必须显示定义一个比较方法。

而在foxtable里面 自定义的方法只能放在全局变量，所以只能这样

全局变量加上如下代码：

    Public Function StrCompare(ByVal x As String, ByVal y As String) As Integer
        Dim a As Integer = x
        Dim b As Integer = y
        Return a.CompareTo(b)
    End Function

然后命令窗口执行：

        Dim s1() As String = "2,6,3,11,8,4,9,1,7,5,10".Split(",")
        Array.Sort(s1, AddressOf StrCompare)
        Output.show(String.Join(",", s1))

呵呵

只考虑整数了

把

        Dim a As Integer = x
        Dim b As Integer = y

换成

        Dim a As Single =  x
        Dim b As Single = y

就可以了

原来的比较方式 把11.1  11.3都强行转换成整数11去比较了

呵呵，你能精简成16楼那样的话，就相当于你独立的研究出了冒泡排序

排序算法除了冒泡法，还有很多、很多其他排序方式

Array.Sort 封装的是快速排序算法

感兴趣的话可以网上搜索一下。

不过算法对于.net来说没多少用，都被别人写好了。