InvertBitmapColors -TizzyT

    Private Sub InvertBitmapColors(ByRef input As Bitmap)
        For x = 0 To input.Width - 1
            For y = 0 To input.Height - 1
                Dim CrntPixelColor As Color = input.GetPixel(x, y)
                Dim R As Integer = 255 - CrntPixelColor.R
                Dim G As Integer = 255 - CrntPixelColor.G
                Dim B As Integer = 255 - CrntPixelColor.B
                input.SetPixel(x, y, Color.FromArgb(R, G, B))
            Next
        Next
    End Sub