USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  socorro, imprimir na vertical
MIRO SILVA
SÃO PAULO
SP - BRASIL
Postada em 12/01/2006 08:33 hs            
tenho que imprimir um código no canhoto da nota fical, mas esta na vertical, como faço pra resolver isso .....?
 
obs.: estou usando o datareport,

Argemiro Aguiar da Silva

Criativa Produtos e Serviços

5511 2135-9600

     
Moreti
SÃO PAULO
SP - BRASIL
Postada em 12/01/2006 11:50 hs            
Pq vc não usa o Objeto Printer ?

   Printer.ScaleMode = vbCentimeters
    Printer.PaperSize = Seu Papel

    Printer.Font = "Arial"
    Printer.Currenty = 5

    Printer.Currentx = 2: Printer.Print "T"

    Printer.Currenty = Printer.Currenty + 1

    Printer.Currentx = 2: Printer.Print "E"

    Printer.Currenty = Printer.Currenty + 1

    Printer.Currentx = 2: Printer.Print "S"

    Printer.Currenty = Printer.Currenty + 1

    Printer.Currentx = 2: Printer.Print "T"

    Printer.Currenty = Printer.Currenty + 1

    Printer.Currentx = 2: Printer.Print "E"

    Printer.EndDoc

    Para testar em tela substitua TODOS OS PRINTER po ME e tire o a linha RINTER.ENDOC

     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página