Hay una .dll que te puede servir, que convierte cualquier imagen a formato JPG y comprime... pero, no sé donde puedo ponértela para que la descargues... sino lo que te escribo abajo queda inservible
Intenta con esta...
este va en GENERAL
Este en el load del FORM
Este en el commandbutton para convertir
el objeto convierte posee 3 parámetros:
* imagen: Sería tu picturebox, yo tengo la imagen ya cargada allí.
* ar: Sería el nombre que le darías a la imagen a convertir en JPG.
* 100, es un entero entre 0-100, modo de compresión.
Si no te sirve... mandame un mensaje a Jhovanny_8@hotmail.com y trato de enviartelo. quede claro, que la .dll no la hice yo pero, sé utilizarla.
Intenta con esta...
este va en GENERAL
Código [Seleccionar]
Dim convierte As Class1Este en el load del FORM
Código [Seleccionar]
Set convierte = New Class1Este en el commandbutton para convertir
Código [Seleccionar]
ar = ""
ar = convierte.GuardarComo(Me, "Guardar Como")
If ar = "" Then Exit Sub
convierte.GrabarJpg Imagen, ar, 100
MsgBox "Imagen convertida al formato JPG", vbInformation, "Imagen guardada correctamente"el objeto convierte posee 3 parámetros:
* imagen: Sería tu picturebox, yo tengo la imagen ya cargada allí.
* ar: Sería el nombre que le darías a la imagen a convertir en JPG.
* 100, es un entero entre 0-100, modo de compresión.
Si no te sirve... mandame un mensaje a Jhovanny_8@hotmail.com y trato de enviartelo. quede claro, que la .dll no la hice yo pero, sé utilizarla.