Asignar un valor de una consulta a una variable
Buenos días
Tengo una duda, quiero hacer una cosa que no se si se puede.
Dim gas, ing As Double
Dim cad1, cad2 As String
cad1 = "select sum(gastos) from TAgua where IdTitular = " & IdTitular.Value & ";"
gas = DoCmd.RunSQL(cad1)
cad2 = "select sum(ingresos) from TAgua where IdTitular = " & IdTitular.Value & ";"
ing = DoCmd.RunSQL(cad2)
Es decir quiero sacar los gastos e ingresos de un titular introducido en un formulario y calcular la diferencia.
¿Se puede hacer esto? ¿Y cómo se puede hacer?.
Muchas gracias por la ayuda
1 Respuesta
El método DoCmd. RunSql se aplica para ejecutar una consulta de acción (actualización, insertar datos, borrar datos... )
Para lo que quieres o lo tienes que hacer con recordset o con la función DSum:
DSum("[nombre del campo a sumar]","[nombre de la tabla]","aquí pones las condiciones")