Ajustar PictureBox a la imagen

[Skipped]

Hola Todos:

Estoy haciendo un programa que achica una imagen grande sin deformarla, el codigo es el suguiente:

Código:

Sub Redimensionar(Origen As PictureBox, Destino As PictureBox)
HeightDestino = Destino.ScaleWidth * Origen.ScaleHeight \ Origen.ScaleWidth
Destino.PaintPicture Origen.Image, 0, 0, Destino.ScaleWidth, HeightDestino
Destino.AutoSize = True
End Sub

Bueno el problema es que el picturebox queda mas grande que la imagen achicada... entonces quiero que el picturebox se ajuste al tamaño de la imagen, para eso use Destino.AutoSize = True pero nose porque no funciona..

¿alguna idea?
Gracias,
Skipped