MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

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

    Compartilhe

    RENATOXEXEU
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 8
    Registrado : 18/01/2016

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

    Mensagem  RENATOXEXEU em 30/8/2018, 20:16

    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

    [Você precisa estar registrado e conectado para ver esta imagem.]
    avatar
    good guy
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1237
    Registrado : 05/02/2010

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

    Mensagem  good guy em 5/9/2018, 15:41

    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

      Data/hora atual: 16/11/2018, 10:16