最小化到托盘需要用到 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:当鼠标悬停在该图标上时显示的文本