Problemas DataReport

[GABRIL]

bueno para ello deberas crear un datareport, agregar las eqtiquetas y tus textbox necesarios en cada seccion del datareport, luego, vincular dichos textbox con cada campo de tu tabla, (datamember, datafield), y bueno aqui te pongo el codigo que va en un boton, solo deberas ajustarlo a tu situacion:


Dim listado As ADODB.Command 'Objeto de tipo comando
Dim Entorn As ENTORNO 'Nuestro entorno de datos
Screen.MousePointer = vbHourglass
'Iniciamos el entorno de datos.
Set Entorn = New ENTORNO
Entorn.conexion.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source= C:\MIPC\BD\admin.mdb" 'ruta de la bd de access
Set listado = Entorn.Commands("tabla_rentas") 'nombre del comando
listado.CommandType = adCmdText 'el tipo de comando a usar
listado.CommandText = "SELECT * FROM rentas where fecha BETWEEN #" & Format(fecha1.Text, "mm/dd/yyyy") & "# AND #" & Format(fecha2.Text, "mm/dd/yyyy") & "# order by fecha" ' tu consulta sql, ajústalo a tu situacion
Load ReporteRentas 'cargas tu datareport, este el nombre del datareport
Screen.MousePointer = vbDefault
ReporteRentas.Show vbModal 'muestras tu datareport..




bueno espero y te sirva , saludos..