主题：关于判断窗口是否已经打开

Dim flag As Boolean = False

Dim mf As WinForm.Form = Forms("主窗体")

For Each f As WinForm.Form In forms

    If f.Opened AndAlso f.name <> "主窗体" AndAlso f.name <> "停靠窗体" AndAlso f.name <> "菜单窗体"  Then

        flag = True

        Exit For

    End If

Next

If flag = False AndAlso Forms("主窗体").Opened Then

  Dim lbl As WinForm.Label =mf.Controls("Label1")

    If lbl.left+lbl.width > 0 Then

        lbl.left -= 10

    Else

        lbl.left = mf.width

   End If

    Forms("主窗体").TimerEnabled = True

End If

当打开某一个模式窗体时主窗体的Label1控件没有隐藏，当再次关闭模式窗体时Label1控件不但没有运行反而被隐藏了