主题：[求助]一个在任务栏中打开子表的代码？

Select Case e.Link.Name
       Case "表A"
          MainTable = Tables("表A")
       Case "表B"
          MainTable = Tables("表B")
       Case "表A.表B"
          MainTable = Tables("表A.表B")
End Select
'MessageBox.Show(e.Page.Name & "|" & e.Link.Name)