Public Class Program
    Private WithEvents Login_form As Login_form = New Login_form()
    Private WithEvents Options As Options = New Options()

    Sub New()

        ' This call is required by the designer.
        InitializeComponent()

        ' Add any initialization after the InitializeComponent() call.
        Me.Opacity = 0
        Me.ShowInTaskbar = False
        StartApp()
    End Sub

    Sub StartApp()
        NotifyIcon.Visible = True
        If My.Settings.Username.Trim = "" Or My.Settings.Password.Trim = "" Or My.Settings.Domain.Trim = "" Or My.Settings.Server.Trim = "" Then
            NotifyIcon.ContextMenuStrip.Enabled = False
            Login_form.Show()
        Else
            StartBot()
        End If
    End Sub

    Private Sub Program_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        NotifyIcon.Dispose()
    End Sub

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

    Public Sub StartBot()

    End Sub

    Public Sub StopBot()

    End Sub

    Private Sub Login_form_FormSaved() Handles Login_form.FormSaved
        LogInToolStripMenuItem.Visible = False
        Options.Show()
    End Sub

    Private Sub Options_FormSaved() Handles Options.FormSaved
        LogInToolStripMenuItem.Enabled = True
        StartBot()
    End Sub

    Private Sub LogInDataToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles LogInDataToolStripMenuItem.Click
        Login_form.Show()
        StopBot()
    End Sub

    Private Sub OptionsToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OptionsToolStripMenuItem.Click
        Options.Show()
        StopBot()
    End Sub
    Private Sub Login_form_NotLoggedIn() Handles Login_form.NotLoggedIn
        NotifyIcon.ShowBalloonTip(10000)
        NotifyIcon.ContextMenuStrip.Enabled = True
        ViewToolStripMenuItem.Enabled = False
        EditToolStripMenuItem.Enabled = False
        LogInToolStripMenuItem.Visible = True
    End Sub
    Private Sub NotifyIcon_BalloonTipClicked(ByVal sender As Object, ByVal e As System.EventArgs) Handles NotifyIcon.BalloonTipClicked
        Dim login_form As Login_form = New Login_form
        Login_form.Show()
    End Sub

    Private Sub LogInToolStripMenuItem_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles LogInToolStripMenuItem.Click
        Dim login_form As Login_form = New Login_form
        Login_form.Show()
    End Sub
End Class