hOla a todas un fuerta abrazo que tal les va hoY'
traigo una duda como puedo hacer para que la imagen se ajuste al tamaño como lo hace el visor de imagenes de windows xp ...
mi imagen tiene que estar en un picture forzamente...
se que la propiedad STRECH de control IMAGE lo hace pero yo lo necesito en un picture..
vi el truco que se posteo en un anterior mensaje:
Código:
Dim ratio As Single
ratio = picfondo.Width / picfondo.Height
If (picfondo.Width / Picture2.Width) < (picfondo.Height / Picture2.Height) Then
'Se debe ajustar al ancho
Image1.Width = Picture2.Width
Image1.Height = Picture2.Width / ratio
Else
Image1.Height = Picture2.Height
Image1.Width = Picture2.Height * ratio
End If
Image1.Picture = picfondo.Picture
pero de todos formas pierde mucha calidad la imagen encambio si se fijan en el visor de imagenes de windows por mas que agranden o achiquen la ventana la imagen sigue teniendo la misma calidad en su prensentacion..
lo que quiero lograr es que mi imagen este en un picture y que se ajuste a su tamaño sin perder calidad.
ejemplo que posteo:
es una imagen 1024x768 ven como por mas que achique la ventana mantiene intacto su calidad.
AJUSTAR IMAGEN COMO LO HACE EL VISOR de images de WINDOWS 
Mode Lineal
