|
|
|
|
|
|
|
|
Dicas
|
|
|
Visual Basic (Impressões/Impressoras)
|
|
 |
Título da Dica: Imprimindo Direto para a Impressora - LPT1
|
 |
|
|
|
Postada em 14/8/2000 por Webmaster
webmaster@vbweb.com.br
Para imprimir direto para a impressora (em modo draft - ideal para emissão de Notas Fiscais e Boletos), voce deve abrir a impressora com o comando Open e utilizar o Print para realizar a impressão:
P_NumArq = FreeFile ' Retorna um Integer que representa o próximo número de arquivo disponível para uso pela instrução Open.
Open "Lpt1" For Output As #P_NumArq
Usando o Print direto na impressora, voce poderá enviar os caracteres especias para imprimir condensado ou mudar o passo da impressora. Exemplo:
Print #P_NumArq, Chr(27) & "0" ' Muda o passo p/ 8 LPP
Print #P_NumArq, Chr(15) ' Condensado
Print #P_NumArq, Chr(27) & "E" ' Negrito
Print #P_NumArq, "" ' Salta uma linha
Close #P_NumArq
|
|
|
|
|
