以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  不同窗口切换筛选树报错  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=158021)

--  作者:foxyuan
--  发布时间:2020/11/5 11:09:00
--  不同窗口切换筛选树报错
自定义菜单功能区不同按钮对应打开不同的窗口,加载不同的筛选树,筛选树都是根据临时表生成,如果临时表用同一个名字,会在切换不同窗口后报错,也就是功能区的按钮第一次打开时会生成新的临时表,但第二次点击时不会执行窗口的afterload代码生成新的临时表了,如何解决?
--  作者:有点蓝
--  发布时间:2020/11/5 11:12:00
--  
方法1、打开新窗口前关闭其它已经打开的窗口
2、把afterload代码放到按钮里

forms("xx").open
afterload代码放到到这里

--  作者:foxyuan
--  发布时间:2020/11/5 12:15:00
--  
谢谢。有没有办法打开新窗口就自动关闭已经打开的其他窗口。
--  作者:有点蓝
--  发布时间:2020/11/5 13:42:00
--  
没有,要自己写代码关闭

For Each frm As WinForm.Form In Forms
  
frm.close
Next
forms("xx").open

--  作者:foxyuan
--  发布时间:2020/11/5 13:46:00
--  
明白了,在MainTableChanged里逐一加
If CurrentTable.Name <> "项目信息" Then
    Forms("项目信息窗口").Close()
End If