我怎样才能完全消除无边界形式?

时间:2015-01-15 01:01:14

标签: vb.net winforms windowstate

在我的应用程序中,我的主表单和其他无边框表单位于顶部。当我最小化主窗体时,我想最小化所有窗体,但只显示任务栏中的主窗体。目前正在发生的是主窗体进入任务栏,但所有其他打开的窗体在任务栏正上方的左下角创建了迷你矩形。

有没有办法可以隐藏这些丑陋的矩形?单击每个矩形将显示该特定窗口(我希望阻止)。我只想让用户选择单击任务栏中的主窗体以自动调出所有窗口。

由于

修改

要隐藏所有表单,我已将以下代码添加到主表单中的Resize事件中:

Private Sub frmDashBoard_Resize(sender As Object, e As EventArgs) Handles Me.Resize
        If Me.WindowState = FormWindowState.Minimized Then
            If focusedForm IsNot Nothing Then
                If focusedForm.Tag Is "StorePage" Then
                    focusedForm.WindowState = FormWindowState.Minimized
                End If
            End If
        End If

        If Me.WindowState = FormWindowState.Maximized Then
            If focusedForm IsNot Nothing Then
                If focusedForm.Tag Is "StorePage" Then
                    focusedForm.WindowState = FormWindowState.Maximized
                End If
            End If
        End If
End Sub

基本上,我在打开时将StorePage设置为focusedForm。因此focusedForm将引用我的应用程序中最顶层的表单。

1 个答案:

答案 0 :(得分:0)

不要将表单最小化,使它们变得不可见,如果你不想看到它们,也没有在任务栏中显示它们,那就是你想要的:

If focusedForm.Tag Is "StorePage" Then
    focusedForm.Visible = (Me.WindowState <> FormWindowState.Minimized)
End If