主题：关于设置当前表的问题【已解决】

SelectedIndexChanged事件：

Select Case e.Sender.SelectedIndex
    Case 0
        MainTable = Tables("部门表")
    Case 1
        MainTable = Tables("行政区域")
    Case 2
        MainTable= Tables("数据字典")
End Select

移行按钮Click事件：

CurrentTable.Position + = 1