Visual Basic.NET - Imprimir con Printdocument

 
Vista:

Imprimir con Printdocument

Publicado por Arsenal (1 intervención) el 09/05/2005 13:53:51
Necesito imprimir un formulario en visual basic.net alguien sabe como puedohacerlo?
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

RE:Imprimir con Printdocument

Publicado por GERAR (86 intervenciones) el 09/05/2005 14:08:15
En mi caso utilizo el crystal report y va muy bien, pero si quieres utilizar la clase printdocument sin utilizar otros programas para empezar = t puede servir esto:

Private Sub imprimir()
txtetiqueta1 = " prueba de impresión"
txtetiqueta2 = " Nº : " & Me.numero.Text + numsel
txtetiqueta = " De : " & Me.importe.Text & " €" & _
Chr(10) & " " & Me.fechasalida.Text
Try
Dim PrintDialog1 As New PrintDialog
PrintDialog1.Document = PrintDocument1
PrintDialog1.PrinterSettings.PrinterName = "impresora de salida"
If PrintDocument1.PrinterSettings.IsValid Then
PrintDocument1.Print() 'Imprime texto
Else
MessageBox.Show("La impresora no es valida")
End If
'---------------------------------------------------
Catch ex As Exception
MessageBox.Show("Hay un problema de impresión", _
ex.ToString())
End Try

End Sub
Private Sub PrintDocument1_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
e.Graphics.DrawString(txtetiqueta1, New Font("verdana", 11, FontStyle.Bold), New SolidBrush(Color.Black), 1, 9)
e.Graphics.DrawString(txtetiqueta2, New Font("verdana", 9, FontStyle.Bold), New SolidBrush(Color.Black), 1, 28)
e.Graphics.DrawString(txtetiqueta, New Font("verdana", 13, FontStyle.Bold), New SolidBrush(Color.Black), 1, 57)
End Sub

Es un ejemplo sencillo a partir de aqui lo q quieras.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar