Vi segnalo un metodo molto semplice per ridimensionare
le immagini utilizzando le librerie messe a disposizione dal framework:
Dim oImage as Image
Dim oThum as Image
oImage = Image.FromFile("vecchiafoto.jpg")
oThumb = oImage.GetThumbnailImage(width, height, Nothing, Nothing)
oThumb.Save("nuovafoto.jpg", ImageFormat.Jpeg)