Salvar e imprimir
Hola, estoy disenando un formulario con un menu para salvar y/o imprimir unas imágenes. He insertado un menu y commondialog. Cuando lo ejecuto se abre la ventana de "Sabe as", pero no guarda las fotos y lo mismo me pasa con la impresora. Se abre el dialogo de la impresora pero no imprime nada.
Este es el código que he escrito. ¿Puedes decirme que me falta para hacerlo funcionar?
Private Sub printfoto_Click()
CommonDialog2.ShowPrinter
End Sub
Private Sub savefoto_Click()
CommonDialog1.Filter = "images (*.bmp,*.ico,*.wmf,*.jpg)|*.bmp;*.ico;*.wmf;*.jpg"
CommonDialog1.ShowSave
End Sub
Gracias por adelantado, seguro que tu respuesta me ayudara.
Pedro.
Este es el código que he escrito. ¿Puedes decirme que me falta para hacerlo funcionar?
Private Sub printfoto_Click()
CommonDialog2.ShowPrinter
End Sub
Private Sub savefoto_Click()
CommonDialog1.Filter = "images (*.bmp,*.ico,*.wmf,*.jpg)|*.bmp;*.ico;*.wmf;*.jpg"
CommonDialog1.ShowSave
End Sub
Gracias por adelantado, seguro que tu respuesta me ayudara.
Pedro.
1 Respuesta
Respuesta de ne2soft