If Me.WindowState = FormWindowState.Minimized Then
NotifyIcon1.Visible = True
Me.Hide()
End If
Private Sub NotifyIcon1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles NotifyIcon1.Click
Me.ShowInTaskbar = False
Me.NotifyIcon1.Visible = False
Me.WindowState = FormWindowState.Normal
End Sub
Private Sub Form1_FormMinizing(ByVal sender As Object, ByVal e As FormClosingEventArgs) Handles Me.FormClosing
'First minimize the form
Me.WindowState = FormWindowState.Minimized
'Now make it invisible (make it look like it went into the system tray)
Me.Visible = False
nfi.ShowBalloonTip(4000)
nfi.Visible = True
Private Sub CheckBox3_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox3.CheckedChanged
if checkbox3.checked then me.minimize = true
If CheckBox3.Checked Then Me.Visible = False
If CheckBox3.Checked Then nfi.Visible = True
End Sub
Private Sub nfi_MouseDoubleClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles nfi.MouseDoubleClick
nfi.Visible = False
Me.WindowState = FormWindowState.Maximized
Me.WindowState = FormStartPosition.default
Me.Visible = True
End Sub