Soma de valores em caixas de texto (formulário)

Boa tarde!


gostaria de somar caixas de texto inserindo valor de resultado em tabela


ex:

caixa de texto1 = 50 R$
caixa resultado = soma da caixa de texto 1

jogando valor final em uma tabela

Olá Renato,

Entendo que seja de formulário contínuo. No Rodapé do formulário, insira uma caixa de texto e na fonte de controle:

=Soma([txtResultado])

Você pode inserir o resultado através da sintaxe SQL INSERT INTO SuaTabela..., através de um botão também no rodapé do formulário:

Código:


Private Sub cmdIncluir_Click()
Dim strSQL As String
Dim lngResultado As Long

lngResultado = Me.txtResultado

DoCmd.SetWarnings False
strSQL = "INSERT INTO SuaTabela(CampoResultado) VALUES ('" & lngResultado & "')  
CurrentDb.Execute strSQL
DoCmd.SetWarnings True
End Sub