Hallo liebes VB-Paradise,
ich habe ein "kleines" Problem ich möchte meine Datagridview ausdrucken was jetzt seit ich datatable benutze nicht mehr funktioniert
Auch durch mehrfaches erkunden im Internet und Forumen habe ich leider nichts brauchbares gefunden
Mein Druck Befehl:
Mein PrintDocument:
Wenn ich Drucken drücke kann ich meinen Drucker auswählen und dann kommt danach der Fehler Drucker wurde gelöscht.
Was ich nicht verstehe es funktionierte doch schonmal ich bitte um hilfe
ich habe ein "kleines" Problem ich möchte meine Datagridview ausdrucken was jetzt seit ich datatable benutze nicht mehr funktioniert
Auch durch mehrfaches erkunden im Internet und Forumen habe ich leider nichts brauchbares gefunden
Mein Druck Befehl:
VB.NET-Quellcode
- Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
- Dim printDlg As New PrintDialog()
- If (printDlg.ShowDialog() = DialogResult.OK) Then
- PrintPreviewDialog1.PrintPreviewControl.Zoom = 2
- PrintDocument1.DefaultPageSettings.Landscape = True
- PrintDocument1.Print()
- End If
- End Sub
Mein PrintDocument:
VB.NET-Quellcode
- Private Sub PrintDocument1_PrintPage_1(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
- Dim g As Graphics = e.Graphics
- Dim Bild As New Bitmap(DataGridView1.Width, DataGridView1.Height)
- Dim Quadrat As New Rectangle(50, 75, DataGridView1.Width, DataGridView1.Height + 50)
- DataGridView1.DrawToBitmap(Bild, Quadrat)
- g.DrawImage(Bild, 0, 0)
- End Sub
Wenn ich Drucken drücke kann ich meinen Drucker auswählen und dann kommt danach der Fehler Drucker wurde gelöscht.
Was ich nicht verstehe es funktionierte doch schonmal ich bitte um hilfe