Resizing an Image with a Certain Interpolation Mode

Images can be resized with GDI+ using different interpolation modes:

Imports System.Drawing
Imports System.Drawing.Drawing2D
Imports System.Drawing.Imaging

⋮

Dim SourceBitmap As New Bitmap("C:\large.bmp")
Dim DestBitmap As New Bitmap( _
    SourceBitmap.Width * 0.1, _
    SourceBitmap.Height * 0.1, _
    PixelFormat.Format24bppRgb _
)
Using SourceBitmap, DestBitmap, g As Graphics = Graphics.FromImage(DestBitmap)

    ' Draw image using specified interpolation mode.
    g.InterpolationMode = InterpolationMode.HighQualityBicubic
    g.DrawImage(SourceBitmap, 0, 0, DestBitmap.Width, DestBitmap.Height)

    DestBitmap.Save("C:\small.bmp")
End Using