VB问题(FlexGrid)

[agan]

在vb中使用FlexGrid的排序功能对一列双精度数排序,当数字很大时(大概超过3亿),排序发生错误,请问什么原因?应如何解决?谢谢!

[Tyro]

当数字很大时确实有问题，可以设置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

[Tyro]

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

[Un1]

去Compare事件中自己写比较