Question

我创建了一个列表表单，它附加到VB.NET中的主表单。这一切都很好，除了当主窗体被激活时，我需要将列表带到前面。我已经添加了一个简单的IF函数来执行此操作，但是当我添加这些代码行时，主窗体以及列表形式现在不会被放到前面，直到你放开鼠标按钮。显然这意味着如果你拖动表单，它会一直停留在后面，直到你放开鼠标按钮。

我添加的代码如下：

 If CRL.Visible = True Then
   CRL.BringToFront()
 End If

CRL是列表形式。

如果我再次注释掉这段代码，主表单会在拖动时显示在前面，但显然列表表单没有。主要表格和清单表格是MDI儿童。

Answer 1

你通过最顶层的财产欺骗它：

If CRL.Visible = True Then
   CRL.BringToFront()
   CRL.TopMost = True 
   Application.DoEvents
   CRL.TopMost = False
End If

拖动时不会形成前面的形式

1 个答案: