[Resolvido]somar dois campos de tabelas diferentes

bom dia a todos,
amigos tenho duas tabelas com valores e gostaria que aparecesse a soma desses dois valores em um
formulario.
Ex: tabela1 campo valorofertas, soma-se todas as ofertas e mostra-se no formulario o total
tabela 2 campo dizimo, soma-se todos os dizimos e mostra-se no formulario o total
algum dos amigos pode ajudar?

Dim valorOferta, dizimo as single

valorOferta =Dsum("valorofertas","NomeTabela")
dizimo =Dsum("dizimo","NomeTabela")

Me.txtTotalDizimo = dizimo
Me.txtTotalOferta = valorOferta

obrigado amigo deu certo!!!!

O Fórum agradece o retorno.