26-12-17, 08:07 PM
استخدم ReportViewer أفضل مه هذه الطريقة
PHP كود :
Private Sub PrintDocument1_PrintPage(ByVal sender As Object, ByVal e As Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
e.Graphics.DrawString("Header", New Font("Arial", 14, FontStyle.Bold), Brushes.Black, New Point(100, 50))
e.Graphics.DrawImage(bitmap, 0, 100)
Dim rectprint As New Rectangle
If Me.DataGridView1.Height = rectprint.Height > 0 Then e.HasMorePages = True
e.Graphics.DrawString("Footer", New Font("Arial", 14, FontStyle.Bold), Brushes.Black, New Point(100, 1100))
End Sub

