Visual Basic - Programar un datareport !!

Hola a todos !!!
por favor!! alguien podría pasarme el código con el que puedo programar un datareport??? me refiero a que no quiero utilizar un dataeviroement para conectar a la base de datos y eso, que lo quiero hacer mediante código.

Muchas gracias por anticipado.
Saludos.

Hola Bélen mira no se si te sirva pero aqui hay un pequeño ejemplo que conecta un datareport con una base de datos. Es una funcion que manda llamar el datareport conectandolo con la base de datos, ah pero antes debes dibujar los controles en el Datareport y en el campo "Datafield" de cada control debes escribir el nombre del campo con el que lo vas a ligar. Espero y te sirva, si no le entienes escribeme y despues vemos que hacer OK. BYE
----------------------------------------------------------------------
Public Sub RegVistaPrevia()
'Declaracion de variable local
Dim s As String
'Se establece la consulta en SQL que extraera los datos de la BD
s = "SELECT * FROM Donador WHERE ID_Donador = " & txt(0).Text

'Conexion del Recordset mediante una conexion a la base de datos
rsReportes.Open s, cnBancoSangre, adOpenKeyset, adLockOptimistic, adCmdText

'Esto es lo que conecta el datareport con la base de datos
Set dtrHistoriaClinica.DataSource = rsReportes

'Se muestra el Datareport y se maximiza
dtrHistoriaClinica.Show
dtrHistoriaClinica.WindowState = 2

End Sub