Protected Overrides Sub OnPaint(ByVal e As System.Windows.Forms.PaintEventArgs)
        '***************************************
        ' Call The Base Paint Method
        '***************************************
        MyBase.OnPaint(e)

        '***************************************
        ' Initialize Variables
        '***************************************
        Dim brushBlueGradient As LinearGradientBrush

        '***************************************
        ' Default Values
        '***************************************
        brushBlueGradient = New LinearGradientBrush(Me.ClientRectangle, _
                                                    Color.FromArgb(115, 160, 196), _
                                                    Color.FromArgb(194, 213, 224), _
                                                    LinearGradientMode.Vertical)

        '***************************************
        ' Draw Main Gradient Area
        '***************************************
        e.Graphics.FillRectangle(brushBlueGradient, New Rectangle(0, 0, Me.ClientSize.Width, Me.ClientSize.Height))
    End Sub