子窗体数据量大的时候，需要滚动条查看数据。那么如何不利用滚动条实现子窗体前后翻动

    这个不是记录翻动的问题，是页面的上下翻动。可以使用GoToPage方法来解决问题。如下示例。有兴趣的版友可以再扩展一下，便能实现子窗体页面的左右翻动。

详细源码：

Private Sub 向上_Click()

    Call 翻页(500, False)

End Sub

Private Sub 向下_Click()

    Call 翻页(500, True)

End Sub

Function 翻页(距离 As Long, 方向 As Boolean)

    Dim frm As Form

    Set frm = Me.子窗体.Form

    Me.子窗体.SetFocus

    If 方向 = True Then

        n = n + 1

    Else

        n = n - 1

    End If

    Me.子窗体.Form.GoToPage 1, 0, 距离 * n

End Function