主题：[求助] 消除表间切换的过程

 试试这样

lockbasemainform
Select Case e.Link.Name   
    Case "网维值班"
       
       
        MainTable = Tables("网维中心值班表") '打开"***"表
        Forms("网维中心值班表主窗口").Open() '打开"***"窗口
        Forms("日常工作任务窗口").Open() '打开"***"窗口
       
       
    Case "工作日志"
       
        MainTable = Tables("工作日志表") '打开"***"表
        Forms("日常工作任务窗口").Open() '打开"***"窗口
        Forms("工作日志表主窗口").Open() '打开"***"窗口
       
End Select
unlockbasemainform