Gostaria de saber como faço para popular um sub-relátorio com um data set.
Segue meu código já feito :
Dim dslocal As New DataSet
Dim cr As New CrystalReport1
Dim dsRelatorio As New frmFatPedidoVendaDS
dslocal = wssysbell.ADMPEDIDOVENDAIMPRESSAO(txtNumero.Text)
cr.SetDataSource(dslocal.Tables(0))
Dim janela As New frmFatPedidoVendaView
janela.CrystalReportViewer1.ReportSource = cr
janela.Show()