Code is as follows:
Public Sub CallPrjreport(ByVal strReportEmbeddedResource As String, ByVal strReportPath As String, ByRef callform As Form)
Dim frm As New view
frm.ReportViewer1.LocalReport.ReportEmbeddedResource = strReportEmbeddedResource.ToString()
frm.ReportViewer1.LocalReport.ReportPath = strReportPath.ToString()
frm.MdiParent = callform
Catch Exp As Exception
MsgBox(Exp.Message, MsgBoxStyle.Critical, "ErrorFound")
Pseudo Code for each menu click :
Call CallPrjreport (full path of rdlc report for eg d:\project_folder\reports\emp.rdlc , report name for eg emp.rdlc , Me)
It calls CallPrjreport by required parameters and reports will be displayed under MDI form.
I am sending following parameters: ReportEmbeddedResource , Report path as well as form to set MDI.
This method will avoid repetition of code in every menu click. This method can be placed in common file such as Module1.vb
No responses found. Be the first to comment...