Cambiar atributos imagenes

Johnnara
02 de Noviembre del 2007
Hola:
Con este codigo guardo un archivo, una imagen.
Dim StrRuta As String="C:"
With Me
.PicFoto.Image.Save(StrRuta)
End With
La guarda perfectamente.
Pero la guarda con una profundidad en bit = 32
Yo quiero guardarla con una profundidad en bit de 24
Esto se puede hacer?
Gracias.