Imports Microsoft.Reporting.WinForms Public Class TaxInvoiceReportViewer Private Sub TaxInvoiceReportViewer_Load(sender As Object, e As EventArgs) Handles MyBase.Load 'set report path ReportViewer1.LocalReport.ReportPath = "F:\Billing Project\Billing System\Billing System\BillingReport.rdlc" 'pass test value Dim r(0) As ReportParameter r(0) = New ReportParameter("rptCompanyName", "Test Val", True) Me.ReportViewer1.LocalReport.SetParameters(New ReportParameter() {r(0)}) 'ReportViewer1.PrinterSettings.DefaultPageSettings.PaperSize = New Printing.PaperSize("Custom", 650, 325) Me.ReportViewer1.RefreshReport() End Sub End Class
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)