辛苦版主了!
附件我上传了SpreadForm1.0编译的exe文件。
具体需求是,点击列头【AB】,使用了SortRows方法,使用列【D】进行升序排序。
当列【D】的数据有重复时,重复的行的顺序,在每次点击列头【AB】都会改变。
代码如下:
Private Sub FpSpread1_CellClick(ByVal sender As Object, ByVal e As FarPoint.Win.Spread.CellClickEventArgs) Handles FpSpread1.CellClick
If e.ColumnHeader AndAlso (e.Row = 0 OrElse e.Row = 1) Then
Dim sort(0) As SortInfo
Dim intCol As Integer = e.Column
If e.Column = 0 Then
intCol = 3
End If
sort(0) = New SortInfo(intCol, True, System.Collections.Comparer.Default)
FpSpread1.Sheets(0).SortRows(0, FpSpread1.Sheets(0).RowCount, sort)
End If
End Sub
相同代码在SpreadForm11.0中,每次点击列头【AB】时,列【D】重复的数据的顺序不会改变,
请版主帮忙看一下,11.0能否做到和1.0的exe相同的效果,谢谢了。
|
|