MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


2 participantes

    Somar valores em horas de uma textbox

    avatar
    Rafaele
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 5
    Registrado : 26/01/2016

    Somar valores em horas de uma textbox Empty Somar valores em horas de uma textbox

    Mensagem  Rafaele 3/2/2016, 14:49

    Boa tarde a todos!

    Tenho uma textbox que realiza um cálculo de diferença de horas:

    HrStr(HrDbl([HorasD])-HrDbl([TempoP]))

    É possível que o resultado desse cálculo da textbox fique registrado em algum campo da minha tabela? Estou com dificuldades de incluir esse resultado em consulta/relatório, pois posteriormente preciso da soma total dessas diferenças.

    Alguém me ajuda?

    Obrigada
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    Somar valores em horas de uma textbox Empty Re: Somar valores em horas de uma textbox

    Mensagem  FabioPaes 6/2/2016, 02:07

    Você pode Criar um Campo na sua tabela para armazenar a diferença.

    Nessa sua Texbox na guia Fonte de Control selecione o Campo Criado na tabela para armazenar a diferença...

    No evento Apos atualizar do Ultimo campo Hora, você colocar sua Formula para calcular...

    Ex: Aqui apos eu digitar a quantidade do produto ele multiplica pelo Valor Unitario e armazena no campo txtTotal

    Private Sub Quantidade_AfterUpdate()
    Me.txtTotal = Me.ValorUnit * Me.Quantidade
    End Sub

    Se não conseguir posta parte do seu BD pra eu dar uma olhada...
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    Somar valores em horas de uma textbox Empty Re: Somar valores em horas de uma textbox

    Mensagem  FabioPaes 6/2/2016, 02:15

    So lembrando que voce tera que mudar algumas coisa na sua Formula, como por exemplo:

    HrStr(HrDbl(]HorasD])-HrDbl(]TempoP]))

    Provavelmente Ficara assim:


    Private Sub TempoP_AfterUpdate()
    Me.NomedaTxbox.value = HrStr(HrDbl([Me.HorasD])-HrDbl([Me.TempoP]))
    End Sub


    Porém, talvez seja desnecessário armazenar essa diferença na Tabela, haja visto que voce pode colocar (da mesma forma como colocou no formulario) pode colocar em Relatórios, Consultas...

    Conteúdo patrocinado


    Somar valores em horas de uma textbox Empty Re: Somar valores em horas de uma textbox

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 6/12/2024, 16:21