Visual Basic - No me funciona IMPRIMIR COPIAS

Life is soft - evento anual de software empresarial
   
Vista:

No me funciona IMPRIMIR COPIAS

Publicado por Javi (90 intervenciones) el 18/12/2007 20:53:44
Tengo este codigo para imprimir con una caja CommondDialog.
PERO.... la opcion de las COPIAS.... ¡¡¡NO ME FUNCIONA¡¡¡

O sea, aunque le diga que imprima 4 copias..... no funciona.... solo imprime 1 sola.
Y por mas que he intentado de todo, no hay forma.

Private Sub BOTONIMPRIMIR_Click()
Dim NUMcopies as Integer
CommonDialog1.ShowPrinter

NUMcopies = CommonDialog1.Copies

For I = 1 To NUMcopies
Printer.PaintPicture Image1.Picture, 5, 5
Next I
Printer.EndDoc

Exit Sub

No entiendo porque el NUMcopies no me va.

¿Alguien me puede ayudar?
Gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
información
Otras secciones de LWP con contenido de Visual Basic
- Código fuente de Visual Basic
- Cursos de Visual Basic
- Temas de Visual Basic
- Chat de Visual Basic
información
Códigos de Visual Basic
- Tijeras
- Juego del BlackJack
- Marquesina