主题：上下选择的问题？

Select Case e.Sender.Name

    Case "上一条"

        CurrentTable.Position = CurrentTable.Position - 1

    Case "下一条"

        CurrentTable.Position = CurrentTable.Position + 1

    Case "最前"

        CurrentTable.Position = 0

    Case "最后"

        CurrentTable.Position = CurrentTable.Rows.Count -1

End Select

如上代码，在主表的情况下可用，但我设计窗口中引用主表为副本表就不可用了，请教代码怎么改？