MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Valor de um campo relativo ao valor de outro

    andrelecio
    andrelecio
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 61
    Registrado : 02/03/2012

    [Resolvido]Valor de um campo relativo ao valor de outro Empty [Resolvido]Valor de um campo relativo ao valor de outro

    Mensagem  andrelecio em 29/11/2018, 00:00

    Salve amigos do fórum,

    Eu gostaria de solicitar ajuda em um procedimento que deve ser básico a grande maioria dos amigos do fórum mas que não sei resolver:

    Tenho um pequeno sistema que controla contas domésticas, no formulário tenho o campo [data_venc] e um lista de valores [status] que possui os valores a vencer, vencida e quitada, minhas duas dúvidas são:

    1) como faço para setar o campo [status] automaticamente para o valor vencida toda vez que o valor do campo [data_venc] estiver no passado?

    2) como faço para colocar um botão de opção com a opção de confirmar o pagamento da conta e setar o valor de [status] para quitado?

    Agradeço de antemão
    avatar
    FabioGO
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 106
    Registrado : 22/08/2012

    [Resolvido]Valor de um campo relativo ao valor de outro Empty Re: [Resolvido]Valor de um campo relativo ao valor de outro

    Mensagem  FabioGO em 29/11/2018, 00:20

    1) No evento Ao abrir ou No atual dependo de como você fez o formulário:

    Código:
    If Me.data_venc < Date then
        Me.status = "vencida"
    End if

    2) No evento Ao clicar de uma caixa de seleção:

    Código:
    If Me.Confirma=-1 Then
        Me.status = "quitado"
    Else
        Me.status = ""
    End if
    andrelecio
    andrelecio
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 61
    Registrado : 02/03/2012

    [Resolvido]Valor de um campo relativo ao valor de outro Empty Re: [Resolvido]Valor de um campo relativo ao valor de outro

    Mensagem  andrelecio em 29/11/2018, 00:37

    Obrigado Fabio,

    Não passei para o segundo passo, pois quero tirar uma dúvida, funcionou perfeitamente mas a expressão também passa as contas quitadas para o status de Vencida, pois também estão no passado
    andrelecio
    andrelecio
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 61
    Registrado : 02/03/2012

    [Resolvido]Valor de um campo relativo ao valor de outro Empty Re: [Resolvido]Valor de um campo relativo ao valor de outro

    Mensagem  andrelecio em 29/11/2018, 00:42

    O Problema parece resolvido da seguinte forma:

    Código:
    If Me.data_venc < Date And Me.status <> "Quitada" Then
        Me.status = "Vencida"
    End If

    andrelecio
    andrelecio
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 61
    Registrado : 02/03/2012

    [Resolvido]Valor de um campo relativo ao valor de outro Empty Re: [Resolvido]Valor de um campo relativo ao valor de outro

    Mensagem  andrelecio em 29/11/2018, 00:49

    Tudo funcionando perfeito, Obrigado Fabio

    Sucesso!
    avatar
    FabioGO
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 106
    Registrado : 22/08/2012

    [Resolvido]Valor de um campo relativo ao valor de outro Empty Re: [Resolvido]Valor de um campo relativo ao valor de outro

    Mensagem  FabioGO em 29/11/2018, 02:00

    Ótimo. Que bom que deu certo.

      Data/hora atual: 4/7/2020, 14:57