切换代码
Forms("窗口1").Controls("TabControl1").SelectedPage = Forms("窗口1").Controls("TabControl1").TabPages("项目信息")