Ahoj, dá se to udělat třeba takhle: na formulář si přidej NotifyIcon a vyzkoušej tenhle kód
Public Class Form1
Private Sub NotifyIcon1_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles NotifyIcon1.MouseDoubleClick
Select Case Me.Visible
Case False
Me.Show()
Me.WindowState = FormWindowState.Normal
Case True
Me.Hide()
End Select
End Sub
Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
If Me.WindowState = FormWindowState.Minimized Then Me.Hide()
End Sub
End Class
|