High Quality Image Resizing

[Phill64]

By changing interpolation mode (the algorithm used to resize) on a graphics object, you can resize your images and keep their quality.

It will use more cpu time then usual, that's why "nearest neighbour" is the traditionally used algorithm, as it is a low cpu cost method.

Here's is a function to resize your Images at a high quality

    Private Function SizeImage(ByVal img As Bitmap, ByVal width As Integer, ByVal height As Integer) As Bitmap
        Dim newBit As New Bitmap(width, Height) 'new blank bitmap
        Dim g As Graphics = Graphics.FromImage(newBit)
        'change interpolation for reduction quality
        g.InterpolationMode = Drawing2D.InterpolationMode.HighQualityBicubic
        g.DrawImage(img, 0, 0, width, Height)
        Return newBit
    End Function