or

Dim oTabla As New DataTable oTabla.Columns.Add("F1") oTabla.Columns.Add("F2") oTabla.Columns.Add("F3") oTabla.Columns.Add("F4") Dim objectDataSource3 As New Telerik.Reporting.ObjectDataSource() Dim oReport3 As New ReportNew1 oReport3.DataSource = oTabla Dim oFrm As New FrmReportViewer oFrm.ReportViewer1.Report = oReport3 oFrm.ReportViewer1.RefreshReport() oFrm.ShowDialog()