最小化到托盘需要用到NotifyIcon 控件,从工具箱中找到并添加,其余代码如下:
'最小化到右下角 & 锁定窗口大小 Private Sub Form1_Resize(ByVal sender As Object,ByVal e As System.EventArgs) Handles MyBase.Resize If Me.WindowState = FormWindowState.Minimized Then Me.Hide() End If '这里实现窗口不允许更改大小(就是在改变窗口大小的时候锁定某一数值,实现无法改变大小的效果。另外要把最大化按钮设置为false) Me.Width = 650 Me.Height = 500 End Sub
'双击托盘中的图标还原窗口 Private Sub NotifyIcon1_DoubleClick(ByVal sender As Object,ByVal e As System.EventArgs) Handles NotifyIcon1.DoubleClick Me.ShowInTaskbar = True Me.Show() Me.WindowState = FormWindowState.Normal End Sub
notifyIcon的两个重要属性:
Icon:将在系统栏中显示的图标
Text:当鼠标悬停在该图标上时显示的文本
原文链接:https://www.f2er.com/vb/258193.html