Visual Basic - Problema con impresión

Life is soft - evento anual de software empresarial
   
Vista:

Problema con impresión

Publicado por Gustavo (1 intervención) el 13/04/2008 17:47:56
Hola a todos.
Tengo un equipo (PC) donde hay varias impresoras instaladas.
En VB, creo un proyecto nuevo, y en el form coloco dos controles: 1 CommandButton y 1 CommonDialog; el siguiente es todo el código del proyecto:

---------------------------------------------------------------------
Option Explicit

Private Sub Command_Click()

CommonDialog.PrinterDefault = True
CommonDialog.CancelError = True
CommonDialog.ShowPrinter

Printer.Print "prueba"
Printer.EndDoc

End Sub
---------------------------------------------------------------------

Esto hace que antes de imprimir "prueba", se presente al usuario el cuadro de diálogo, para que seleccione que impresora desea usar.
Funciona Ok.

EL PROBLEMA es que si agrego una línea para elegir la orientación del papel:

---------------------------------------------------------------------
Option Explicit

Private Sub Command_Click()

CommonDialog.PrinterDefault = True
CommonDialog.CancelError = True
CommonDialog.ShowPrinter

Printer.Orientation = vbPRORPortrait '******** <-- esta es la linea que agrego

Printer.Print "prueba"
Printer.EndDoc

End Sub
---------------------------------------------------------------------

Pasa lo siguiente:
La primera vez que que se hace click en el botón se imprime en la impresora seleccionada, pero en los sucesivos "clicks" (sin haber salido de la aplicación), no toma la seleccion del usuario; sigue imprimiendo en la primera elección que el usuario había hecho.

Alguien sabe por qué?
El "lío" lo arma "Printer.Orientation..." pero no tengo idea por qué ...

Muchas 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
- Colores RGB
- Color del menu
- Impresoras