Visual Basic - Ayuda Datareport/Datasource

Bueno esto es lo ultimo que le falta a mi proyecto y no soy capaz de dar con la solucion.
Tengo un DataReport con varios rPtLabel en los que se mostraran unos valores que se almacenan.
El programa presenta un formulario con datos el cual al dar a imprimir los guarda en una tabla mediante un recordset. La cosa es que no se como establecer la propiedad datasource para uqe vaya a este recordset y que cada Label coja su valor determinado, tengo este codigo al dar a imprimir:
Dim cadena As String
Do Until rsgrabados.EOF 'SE GRABAN A UNA TABLA APARTE********
rsgrabados.MoveNext
If rsgrabados.EOF Then
Exit Do
End If
Loop
cadena2 = "insert into Grabados (PrimerApellido,SegundoApellido) values ('" & TxtApellido1.Text & "','" & TxtApellido2.Text & "')"
db.Execute cadena2
rsgrabados.Requery


DataReport1.Sections(1).Controls.Item("Etiqueta1").Caption = rsgrabados("PrimerApellido")
DataReport1.Sections(1).Controls.Item("Etiqueta2").Caption = ReseñaPrincipal.TxtApellido2.Text


DataReport1.Show

Espero alguna sugerencia please!!!!