XtraReport Bindings

Change

Private WithEvents bindingSource1 As System.Windows.Forms.BindingSource

To

Public WithEvents bindingSource1 As System.Windows.Forms.BindingSource

Also the bindingSource Datasource needs to be changed in the report code.

Me.bindingSource1.DataSource = GetType(TypeofObject)

For the report viewer, again bind the bindingSource Datasource

Dim objects As objects
objects = GetAllObjects()
Dim Report1 As New XtraReport1
Report1.bindingSource1.DataSource = objects
ReportViewer1.Report = Report1