VB.NET打开非子窗体时MDI父窗体隐藏问题求助

我之前做VB.NET MDI应用时也碰到过一模一样的问题——模态对话框加载过程中MDI主窗体会被其他应用抢焦点，试了ShowDialog(Me)也不管用，给你几个亲测有效的解决方案：

1. 先激活MDI主窗体再显示对话框 #

有时候MDI主窗体因为子窗体的存在处于非激活状态，模态对话框启动时系统没正确锁定父窗体的顶层位置。调用对话框前先激活主窗体：

' 先让MDI主窗体获得焦点
Me.Activate()
form2.TopMost = True
form2.WindowState = FormWindowState.Normal
form2.ShowDialog(Me)

2. 调整对话框的Owner和TopMost设置顺序，加窗体激活 #

把Owner设置和TopMost的顺序调整一下，同时在对话框的Load事件里强制激活自己，确保它能抢占焦点：

触发代码： #

form2.Owner = Me
form2.WindowState = FormWindowState.Normal
form2.TopMost = True
form2.ShowDialog()

在Form2的Load事件中添加： #

Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    ' 强制激活当前对话框，避免焦点丢失
    Me.Activate()
End Sub

3. 临时将MDI主窗体设为TopMost #

如果你的MDI主窗体本身不是TopMost，对话框加载时很容易被其他TopMost应用遮挡。可以临时把主窗体设为TopMost，对话框关闭后再恢复原来的状态：

' 保存主窗体原来的TopMost状态
Dim originalTopMostStatus As Boolean = Me.TopMost
Me.TopMost = True

form2.Owner = Me
form2.WindowState = FormWindowState.Normal
form2.ShowDialog()

' 恢复主窗体原来的TopMost设置
Me.TopMost = originalTopMostStatus

4. 检查对话框是否有耗时的加载操作 #

如果Form2的Load事件里有大量数据查询、文件读取这类耗时操作，会阻塞UI线程，导致MDI主窗体失去响应被其他应用覆盖。这种情况建议把耗时操作放到后台线程处理，比如用BackgroundWorker：

在Form2中实现： #

Private WithEvents bgWorker As New BackgroundWorker()

Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
    Me.Activate()
    ' 启动后台线程执行耗时操作
    bgWorker.RunWorkerAsync()
End Sub

Private Sub bgWorker_DoWork(sender As Object, e As DoWorkEventArgs) Handles bgWorker.DoWork
    ' 这里放你的耗时加载逻辑，比如数据库查询、数据计算等
End Sub

Private Sub bgWorker_RunWorkerCompleted(sender As Object, e As RunWorkerCompletedEventArgs) Handles bgWorker.RunWorkerCompleted
    ' 加载完成后更新UI控件
End Sub

补充一下为什么ShowDialog(Me)无效：MDI环境下的窗体焦点管理比较特殊，当有多个子窗体打开时，系统对模态对话框的Owner关联逻辑会出现优先级混乱，所以需要额外的激活和置顶操作来强制保证MDI主窗体的可见性。

内容的提问来源于stack exchange，提问作者MoparKing