eu faria em algumas etapas...
1. ssql= "select * from Caixa where DataCaixa=" & VariavelData
'com esta vc vai pegar os dados da tabela caixa e somá-los...
2. ssql= "select * from despesas where DataDespesa=" & VariavelData
'Antes de efetuar a subtração conferimos SE existem despesas...
'em DAO seria
set tabela= banco openrecordset( ssql, dbopensnapshot)
do until tabela.eof
N = tabela.recordcount
tabela.movenext
loop
tabela.close
If N=0 then ' Não existem despesas nesta data
Soma_Despesas=0
else
set tabela= banco openrecordset( ssql, dbopensnapshot)
do until tabela.eof
SomaDespesas=SomaDespesas+ tabela("valor")
tabela.movenext
loop
tabela.close
agora é só completar a operação...
