vb.net - 拖动时表单未置于最前面

标签 vb.net forms drag

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

我添加的代码如下:

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

CRL是列表形式。

如果我再次注释掉这段代码,拖动时主窗体会被带到前面,但显然列表窗体不会。主窗体和列表窗体都是 MDI 子窗体。

最佳答案

你通过最顶层的属性来欺骗它:

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

关于vb.net - 拖动时表单未置于最前面,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/10102692/

相关文章:

mysql - 通过存储过程分配行号

javascript - 如何在 angularjs 表单字段中输入多个电子邮件 ID?

excel - 向下拖动公式并更改行引用而不是列

jquery - 是否可以更改 JSON 中的页面 webmethod 响应,删除 .d 节点?

java - VB.NET Web 服务客户端访问 Java Web 服务 - 连接中止

javascript禁用在chrome中点击事件之前触发的输入图像提交按钮

actionscript-3 - 在as3中使用多点触控同时拖动两个对象

ios - 无法控制拖动到 ViewController.swift

c# - c# 中 My.Computer 的等价物是什么

python - 将数据从 HTML 表单发送到 Flask 中的 Python 脚本