以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  共有窗口有多个按钮,用于打开窗口,用户可能未关闭之前的窗口,就打开新窗口  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=187500)

--  作者:zhangjian222200
--  发布时间:2023/7/22 9:38:00
--  共有窗口有多个按钮,用于打开窗口,用户可能未关闭之前的窗口,就打开新窗口
下面这样行吗?

For Each frm As WinForm.Form In Forms
    If frm.Opened AndAlso frm.Name.StartsWith("共有窗口") = false  Then
        frm.Close()
    End If
Next

--  作者:有点蓝
--  发布时间:2023/7/22 9:55:00
--  
测试有什么问题?共有窗口的名称都叫【共有窗口xxx】?