AfterOpenProject事件
Tables("表A").Visible = False
Tables("表B").Visible = True
Tables("表C").Visible = False