Stampa in VB.NET

[esposito]

Salve, da qualche tempo sto studiando VB.NET e sto cercando di tradurre in questo linguaggio tutto ciò che so già fare in VB5/VB6.

Il problema che sto affrontando attualmente è quello della stampa. In VB6 sono in grado di effettuare stampe di qualsiasi genere (testi con o senza a capo automatico, con allineamento a sinistra, centrato, a destra e giustificato, grafici ecc.) mentre in VB.NET mi trovo ancora in alto mare.

Vorrei quindi cominciare a chiedervi l'equivalente in VB.NET della seguente riga di codice in VB6:

Printer.Print "Ciao mondo!"

Grazie in anticipo.

Pasquale Esposito
Perugia

[darkblOOd]

puoi usare l'oggetto printDialog e printDocument

nell'evento PrintPage dell'oggetto printDocument puoi scrivere:

    Private Sub PrintDocument_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument.PrintPage
        Dim myFont As New System.Drawing.Font("Arial", 9)
        Dim myFormat As New Drawing.StringFormat()
        myFormat.FormatFlags = Drawing.StringFormatFlags.DirectionRightToLeft

        e.Graphics.DrawRectangle(New Drawing.Pen(Drawing.Brushes.Black), 100, 100, 627, 25)
        e.Graphics.DrawString("Ciao Mondo!", myFont, Drawing.Brushes.Black, 105, 105)

    End Sub

e poi nella tua routine di stampa, dopo aver impostato l'oggetto PrintDocument nella proprietà Document dell'oggetto PrintDialog:

Private Sub LanciaStampa
With Me.PrintDialog
    If .ShowDialog = Windows.Forms.DialogResult.OK Then
         .Document.Print()
    End If
End With

che ti richiama la stampa del Documet che viene creato ogni volta che scatta l'evento PrintPage

controllati questa classe:
System.Drawing.Printing.PrintPageEventArgs
in modo tale da personalizzare il documento

In ogni caso dai un'pcchiata al Crystal Report che trovi embedded nell'IDE visto che è abbastanza meno macchinoso rispetto all'oggetto PrintDocument