[zaer]

الجعل المتغير ast في الفورم Form22 وخليه عام Public وقبل ما تستدعي الفورم Form22 ضع قيمة في المتغير مثل "add"

كود :

Form22.ast = "add"
Form22.Show()

وهذا التعديل للفورم Form22

كود :

 Public ast As String=""

 Private Sub Form22_Load(sender As Object, e As EventArgs) Handles MyBase.Load
      load()
  End Sub

 Private Sub load()
      Me.DataTable1TableAdapter.Fill(Me.dbvDataSet.DataTable1)
      If ast = "add" Then
          Dim lst = From x In Me.dbvDataSet.DataTable1 Where x.ID = Val(folder.txtnamper.Text) - 1
          If lst.Count > 0 Then
              Me.ReportViewer1.LocalReport.DataSources(0).Value = lst.CopyToDataTable
              Me.ReportViewer1.RefreshReport()
          End If
      Else
          Dim lst = From x In Me.dbvDataSet.DataTable1 Where x.ID = Val(folder.txtnamper.Text) - 0
          If lst.Count > 0 Then
              Me.ReportViewer1.LocalReport.DataSources(0).Value = lst.CopyToDataTable
              Me.ReportViewer1.RefreshReport()
          End If
      End If
  End Sub

---

اذا استمرت المشكلة ضع المشروع عشان نعرف ما هي المشكلة