none
Imprimir envelopes

    Question

  • Agora que eu percebi que não existe mais o Objeto Printer

     

    como eu faço para imprimir envelopes pelo vb.net?

    ps não quero visualizar 

    quero imprimir direto

    Wednesday, July 27, 2011 5:59 PM

Answers

  • Ola

     

    O objeto Printer foi substituido pelo PrintDocument.

     

    Vejo um exemplo simples

      Imports System.Drawing.Printing
    
    
      Public Class Form1
        Private printFont As Font
        Private Sub pd_PrintPage(sender As Object, ev As PrintPageEventArgs)
          ev.Graphics.DrawString("Teste", printFont, Brushes.Black, 10, 10, New StringFormat())
    
        End Sub
    
        ' Print the file.
        Public Sub Printing()
          Try
            printFont = New Font("Arial", 10)
            Dim pd As New PrintDocument()
            AddHandler pd.PrintPage, AddressOf pd_PrintPage
            ' executa a impressao
            pd.Print()
          Catch ex As Exception
            MessageBox.Show(ex.Message)
          End Try
        End Sub 'Printing  
        Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
          Printing()
        End Sub
      End Class
    

    aqui este um exemplo completo de impressao (com previsualizaçao) em VB.NET

    http://vb-helper.com/howto_net_print_and_preview.html

    Att


    William John Adam Trindade
    Analyste-programmeur
    ----------------------------------------------------------

    SOGI INFORMATIQUE LTÉE (http://www.sogi.com)
    Wednesday, July 27, 2011 6:37 PM