imprimer une datagridview

Bonsoir,
Pour imprimer une datagridview j'ai utilisé PrintDocument, PrintPreviewDialog et un bouton mais j'ai obtenu un mauvais résultat comme il est indiqué dans l'image ci-joint Pièce jointe 140380

Code:

1
2
3
4
5
6
7
8
9
 
Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
        Dim myPaintArgs As New PaintEventArgs(e.Graphics, New Rectangle(New Point(0, 0), Me.Size))
        Me.InvokePaint(DataGridView1, myPaintArgs)
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        PrintPreviewDialog1.ShowDialog()
    End Sub

Merci de corriger ce code