以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  重新加载窗口怎么设置呀  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=87171)
--  作者：莉莉1949
--  发布时间：2016/7/5 10:26:00
--  重新加载窗口怎么设置呀
因为不同的用户打开的窗口的界面是有所不同的，我使用的自定义的用户登录窗口，当我切换用户之后，窗口如何重新加载，重新执行aferload时间代码？
--  作者：大红袍
--  发布时间：2016/7/5 10:28:00
--  

 关闭所有窗口，重新打开。

 

For Each frm As WinForm.Form In forms
    If frm.Opened Then
        Dim name As String = frm.Name
        frm.Close
        forms(name).Open
    Next
Next
--  作者：544199409
--  发布时间：2016/7/27 15:27:00
--  

For Each frm As WinForm.Form In forms
    If frm.Opened Then
        Dim name As String = frm.Name
        frm.Close
        forms(name).Open
    End If

Next