IMPRIMIR COMO PAISAGEM

FEEHPEREZ 30/05/2014 17:18:03
#438639

Boa Tarde Pessoal, gostaria da ajuda de vocês.

meu problema eh o seguinte, tenho um form que é uma imagem que cabe na impressão como paisagem, porem só imprime em retrato e não sei o que fazer para ficar padrão como paisagem essa imagem e já sair na pagina corretamente.

o código que uso é esse.

Private Sub Form_KeyPress(KeyAscii As Integer)
CommonDialog1.ShowPrinter
Set ImpressoraPadrão = Printer

For Each Nova_Impressora In Printers
If Nova_Impressora.hDC = CommonDialog1.hDC Then
Set Printer = Nova_Impressora
End If
Next

ImpFor.PrintForm
Printer.EndDoc
[ô]Set Printer = ImpressoraPadrão
End Function


basta eu clicar em enter e ele me da a opção de escolha de impressora, mas mesmo trocando na propriedades da impressora para paisagem ainda assim imprime como retrato..

obrigado pela força pessoal