对于Always On Top选项，Visual Basic代码是什么？

Question

我有一个永远在顶部工具条菜单选项，我无法找出使其在检查时保持在其他窗口之上的代码，反之亦然未选中。你能帮忙吗？

Answer 1

要设置“始终在最前面”，请从菜单选项中设置myForm.TopMost = True。请参阅Form.TopMost documentation。

要重新取消设置，请设置myForm.TopMost = False。

Answer 2

要切换Form是否为TopMost，只需更改属性Form.TopMost即可。

例如，要将表单设置为顶部，请使用：

Form.TopMost = True

要停用TopMost，请使用此项：

Form.TopMost = False

Answer 3

如果您希望用户驱动，这就是我用来处理事件的方法。您显然希望创建一个名为chkAlwaysOnTop的复选框。它也可以很容易地存储在用户设置中，以使其在实例之间保持状态。

Private Sub chkAlwaysOnTop_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles chkAlwaysOnTop.CheckedChanged
    Me.TopMost = chkAlwaysOnTop.Checked            
End Sub

如果您想为用户保存所述状态，您将在程序中想要这个：

Private Sub MainActivity_FormClosing(sender As Object, e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
    My.Settings.AlwaysOnTop = chkAlwaysOnTop.Checked
    My.Settings.Save()
End Sub

您还需要在表单加载中使用此功能：

 Me.TopMost = My.Settings.AlwaysOnTop
 chkAlwaysOnTop.Checked = My.Settings.AlwaysOnTop

如果您对我使用过的内容感兴趣，请点击此处：Rubber Stamp（包含源代码链接）

Answer 4

可以是：

Me.TopMost = true 

或false。

Answer 5

要启用和关闭它，请使用：

TopMost = CheckBox1.Checked

只需确保将CheckBox1替换为您正在使用的任何内容。