Сохранить сетку данных и распечатать сетку данных - PullRequest
Новая
       20

Сохранить сетку данных и распечатать сетку данных

0 голосов
/ 25 марта 2019

Я печатаю PrintDocument1 перед сохранением, но после сохранения не могу распечатать документ;он показывает эту ошибку:

System.AccessViolationException: 'Попытка чтения или записи в защищенную память.Это часто указывает на то, что другая память повреждена. 

Public Class Form1
    Private Sub Table1BindingNavigatorSaveItem_Click(sender As Object, e As EventArgs) Handles Table1BindingNavigatorSaveItem.Click
        Me.Validate()
        Me.Table1BindingSource.EndEdit()
        Me.TableAdapterManager.UpdateAll(Me.Restorent_server_100DataSet)

    End Sub

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        'TODO: This line of code loads data into the 'Restorent_server_100DataSet.Table1' table. You can move, or remove it, as needed.
        Me.Table1TableAdapter.Fill(Me.Restorent_server_100DataSet.Table1)

    End Sub

    Private Sub PrintDocument1_PrintPage(sender As Object, e As Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage

        Dim ReportFont As New Drawing.Font("Time New Roman", 16)
        Dim ReportFont1 As New Drawing.Font("Time New Roman", 8)

        e.Graphics.DrawString("VAISHALI COMFORTS ", ReportFont, Brushes.Black, 140, 50)

        e.Graphics.DrawString("SL", ReportFont1, Brushes.Black, 102, 203)

        e.Graphics.DrawString("FOOD NAME", ReportFont1, Brushes.Black, 122, 203)

        e.Graphics.DrawString("RATE", ReportFont1, Brushes.Black, 292, 203)

        e.Graphics.DrawString("QTY", ReportFont1, Brushes.Black, 332, 203)

        e.Graphics.DrawString("AMOUNT", ReportFont1, Brushes.Black, 362, 203)

    End Sub

 End Class

Мне нужно распечатать документ после сохранения.

...