[vbnet]

-
جرب في Form2

كود :

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Me.Database1DataSet.Ta.Clear()
    Me.TaTableAdapter.FillBy(Me.Database1DataSet.Ta, A1)
    ReportViewer1.RefreshReport()
    Me.Close()
    Form1.Show()
End Sub