Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Me.Text = "Testing the Icon :)"
NotifyIcon1.Icon = Me.Icon
NotifyIcon1.ContextMenuStrip = ContextMenuStrip1
NotifyIcon1.Visible = False
Me.ContextMenuStrip = ContextMenuStrip2

End Sub

Private Sub ShowFormToolStripMenuItem_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles ShowFormToolStripMenuItem.Click

Me.Show()
NotifyIcon1.Visible = False

End Sub

Private Sub ExitToolStripMenuItem_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles ExitToolStripMenuItem.Click

Application.Exit()

End Sub

Private Sub MinToolStripMenuItem_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles MinToolStripMenuItem.Click

Me.Hide()
NotifyIcon1.Visible = True

End Sub

Private Sub NotifyIcon1_DoubleClick(ByVal sender As Object, ByVal e As System.EventArgs) Handles NotifyIcon1.DoubleClick

Me.Show()
NotifyIcon1.Visible = False

End Sub
End Class