kann mir jemand helfen wie ich im VB08 den text aus einer textbox drucken kann!?!?!?!

...komplette Frage anzeigen

1 Antwort

Nimm aus der Toolbox eine PrintDocument-Komponente in Dein Formular auf und schreibe für den PrintPage-Ereignishandler der Komponente folgenden Code:

e.Graphics.DrawString(TextBox1.Text, New System.Drawing.Font("Arial", 16), Brushes.Black, 50, 50)

Dann starte den Druckvorgang durch Aufruf von PrintDocument1.Print()


Hier der komplette Beispielcode (habe noch eine PrintDialog-Komponente eingefügt, um den Drucker auszuwählen):

Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        If PrintDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
            PrintDocument1.Print()
        End If
    End Sub

    Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
        e.Graphics.DrawString(TextBox1.Text, New System.Drawing.Font("Arial", 16), Brushes.Black, 50, 50)
    End Sub

End Class

Form1 enthält folgende Komponenten: 1 Button, 1 TextBox, 1 PrintDialog und 1 PrintDocument

Was möchtest Du wissen?