请教：对msflexgrid控件的数据翻页时，如何使得数据总是显示当前也的第一条数据在最前面？

Question

我碰到这样的一个问题：
当我在某一页将滚动条拉到中间时，翻页后msflexgrid不会将滚动条复位到第一条记录处，还是显示在上一页未翻页时的位置。
怎么办？
请教请教！

Answer 1

不会吧，你是怎样实现翻页的。
可以利用记录集翻页的功能重新对msflexgrid 写入数据。

Answer 2

Private Sub msflexgrid1_SelChange()
    With msflexgrid1
        If .RowIsVisible(.RowSel) = False Then .TopRow = .RowSel
    End With
End Sub

Answer 3

Private Sub msflexgrid1_Scroll()
    With msflexgrid1
        If .RowIsVisible(.RowSel) = False Then
            .TopRow = .RowSel
        End If
    End With
End Sub

Answer 4

TopRow 属性 ==>返回或设置 MSHFlexGrid 中最上面的可视行
RowIsVisible属性==>返回或设置一个值，决定一个指定行是否可见。
选取则要同时考虑 Row / RowSel 和 Col / ColSel 属性