Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim ds As New ReportDataSource("ds_rapordata") Dim rps(0) As ReportParameter frm_rapor_goster.ReportViewer1.Reset() ds.Value = dt_grid.DataSource frm_rapor_goster.ReportViewer1.LocalReport.DataSources.Clear() frm_rapor_goster.ReportViewer1.LocalReport.DataSources.Add(ds) rps.SetValue(New ReportParameter("rp_baslik", "Başlık"), 0) frm_rapor_goster.ReportViewer1.LocalReport.SetParameters(rps) frm_rapor_goster.ReportViewer1.LocalReport.ReportEmbeddedResource = "WF_PROJECT.rpr_ucuslar_milli.rdlc" frm_rapor_goster.MdiParent = Me.MdiParent frm_rapor_goster.Show() End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)