Dim objRptDoc as New ReportDocument() Me.customertableAdapter.Fill(me.ds300.customerstatus) Me.customertableAdapter.Fill(me.ds200.customer) objRptDoc.Load(Application.startuppath & "\Report200.rpt") objRptDoc.setDataSource(ds200) 'In this, if i want to pass ds200 and ds300, how can i do? CRV.reportSource = objRptDoc