AYUDA DATA
NECESITO EXTRAER UN UN REGISTRO DE LA BASE DE DATOS PERO QUIEREO QUE LA PEROSONA CONSULTE LA FECHA Y LUEGO BOTES LO RESULTADOS EJEMPLO;
Private Sub CmTotalEgresos_Click()
Data2.DatabaseName = App.Path & "DBGIMNASIO.mdb"
a = Data2.DatabaseName
a = "SELECT Sum(total_pagar) AS [Total Egresos Empleados] FROM Egresos"
Print a, "total de egresos"
End Sub
pero al momento de oprimir el boton no me trae el resultado, como hago
QUIEN ME PUEDE AYUDAR
Private Sub CmTotalEgresos_Click()
Data2.DatabaseName = App.Path & "DBGIMNASIO.mdb"
a = Data2.DatabaseName
a = "SELECT Sum(total_pagar) AS [Total Egresos Empleados] FROM Egresos"
Print a, "total de egresos"
End Sub
pero al momento de oprimir el boton no me trae el resultado, como hago
QUIEN ME PUEDE AYUDAR
