以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  窗口为什么反应这么慢  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=130549)
--  作者：hongye
--  发布时间：2019/1/24 21:27:00
--  窗口为什么反应这么慢

Dim Bar As WinForm.NavBar
Bar = e.Form.Controls("菜单栏")
If Bar.SelectedPage.Butt Then
    Forms("企业共有框主页面").Show()
Else
    Forms("企业共有框主页面").Close
    Forms("公司信息").Close
End If
If Bar.SelectedPage.Butt Then
    Forms("员工共有框主页面").Show()
Else
    Forms("员工共有框主页面").Close
    Forms("员工信息").Close
Forms("员工信息共有窗口").Close
End If

能帮我看看吗？为什么每次切换窗口这么慢
--  作者：有点甜
--  发布时间：2019/1/25 9:53:00
--  

 

1、没有必要close窗口吧？保留show的代码即可。

 

2、做一个对应的例子发上来测试。