Reducir Imagen en Picturebox

[Codymarc]

Muchachos, ya lo resolvi. Paso el Codigo por si alguno lo necesita

Dim RectFinal As Rectangle
Dim RectInicial As Rectangle

Dim ImagenFinal As Bitmap
Dim Graficador As Graphics

RectFinal = New Rectangle(0, 0, Obj.widht, Obj.Height)
RectInicial = New Rectangle(0, 0, Obj.widht, Obj.Height)
ImagenFinal = New Bitmap((frmMainForm.pPanelCentral.Width - Obj.Location.X), Obj.Height)

Graficador = Graphics.FromImage(ImagenFinal)
Graficador.DrawImage(Obj.Image, RectInicial, RectFinal, GraphicsUnit.Pixel)
ImagenFinal.Save("C:\IF.bmp")

Si bien no reduce la imagen, te permite recortarla, y en mi caso, modificando un poco mi programa original, me vino al pelo.

Gracias a todos por sus aportes.
Saludos.