我有一个永远在最上面的工具条菜单选项,我不能找出代码,使它保持在其他窗口顶部检查时,反之亦然,当选中。你能帮忙吗?Visual Basic代码对于Always On Top选项是什么?
回答
要设置“总在最前面,“从您的菜单选项中设置myForm.TopMost = True
。请参阅Form.TopMost documentation。
要再次取消设置,请设置myForm.TopMost = False
。
要切换Form
是否为TopMost
,只需更改属性Form.TopMost
。
例如,设置形式来放在上面,用这个:
Form.TopMost = True
要禁用TopMost
,使用此:
Form.TopMost = False
这段代码只是使一个“总是在最上面”。我想让用户选择总是打开和关闭。 – 2012-03-06 22:48:37
@Tyler Malo要再次关闭它,请调用'TopMost = False;'。 – rob05c 2012-03-06 22:49:27
它可以是:
Me.TopMost = true
或false
。
这是我用来处理事件,如果你想它的用户驱动。当然,您显然想创建一个名为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(包括源代码链接)
- 1. Pane always on top - JavaFX
- 2. jquery mobile fixed(always on top)标题
- 3. 什么是Visual Basic等同于Java的“!”?
- 4. 什么是procErr:用于Visual Basic中?
- 5. 的Visual Basic号码选择代码
- 6. 的Visual Basic,代码清洁
- 7. Visual Basic(错误代码)
- 8. Azure WebSite Always On
- 9. Visual basic回文代码
- 10. 清洁Visual Basic代码
- 11. 针对Visual Studio 6/Visual Basic 6的AddIn建议代码Nagivigation&Exploring
- 12. Visual Studio代码首选项
- 13. jquery ui dialog top always> 0
- 14. 可以在<a href always on top by using jquery?
- 15. 什么是在Visual Basic中的=相当于?
- 16. 在Visual Basic for Excel中,什么是Java的“。*”相当于?
- 17. isExecuting on HMActionSets always false
- 18. 代码中的串口,Visual Basic 2010
- 19. OnBind()on service always always returns False - Android
- 20. 对Visual Basic中
- 21. 什么是Visual Studio 2015中代码合同的最佳选择?
- 22. 对于Windows Store应用程序,DisplayMemberPath =“Value”的替代选项是什么?
- 23. Visual Basic登录表单代码
- 24. visual basic 6(vb6)代码含义
- 25. Visual Basic 6.0代码生成器
- 26. 电话号码项目visual basic
- 27. Visual Studios 2017,“Basic Page”选项不可用
- 28. Visual Basic 6.0缺少richtextedit组件选项
- 29. Visual Basic代码来检测pendrive
- 30. 调用Javascript代码在ASP(Visual Basic中)
Ahh我发现了这个问题......我必须启用CheckOnClick属性来保持always on top选项 – 2012-03-06 23:06:47