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

      NotifyIcon1.Visible = False

      End Sub



      Private Sub NotifyIcon1_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles NotifyIcon1.MouseDoubleClick
      Try

      Me.Show()

      Me.WindowState = FormWindowState.Normal

      NotifyIcon1.Visible = False

      Catch ex As Exception

      MsgBox(ex.Message)

      End Try

      End Sub

      Private Sub Form1_Resize(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Resize
      Try
      If Me.WindowState = FormWindowState.Minimized Then
      Me.WindowState = FormWindowState.Minimized
      NotifyIcon1.Visible = True
      Me.Hide()
      End If
      Catch ex As Exception
      MsgBox(ex.Message)
      End Try
      End Sub