VB问题(FlexGrid)

Question

排序发生错误是什么意思？
出现异常还是排序乱了？

Answer 1

当数字很大时确实有问题，可以设置MSFlexGrid1.Sort = 9
然后在MSFlexGrid1的Compare事件中自己排序，不过会有些慢例如：
Private Sub MSFlexGrid1_Compare(ByVal Row1 As Long, ByVal Row2 As Long, Cmp As Integer)
    Dim str1 As String, str2 As String
    str1 = MSFlexGrid1.TextMatrix(Row1, 0)
    str2 = MSFlexGrid1.TextMatrix(Row2, 0)
    If CDbl(str1) > CDbl(str2) Then
        Cmp = -1
    Else
        Cmp = 1
    End If
End Sub