MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    mostrar menssagem informando o numero de parcelas

    Compartilhe

    Marco Antonio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 08/02/2014

    mostrar menssagem informando o numero de parcelas

    Mensagem  Marco Antonio em Sab 08 Fev 2014, 12:44

    ola boa dia preciso construir uma função  no acesse que me dê uma mensagem de quanto parcelas  os seguintes resultados

    se totalapagar for < 60   =  uma parcela
                               >=60 e <=89= duas parcelas
                               >= 90 e <= 119 = trez parcelas
                                >=120 e <=149 = quatro parcelas
                                >= 150 e<= 179 = cinco parcelas
                                >= 180 e <= 209 = seis parcelas
                                   se for >= 210 = 7 parcelas


    desde já agradeco

    Nivaldo
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 708
    Registrado : 08/12/2009

    Re: mostrar menssagem informando o numero de parcelas

    Mensagem  Nivaldo em Sab 08 Fev 2014, 15:28

    Bom dia Marco.

    Seja bem vindo ao fórum.

    Tem várias maneiras de se fazer isso. Uma delas é:

    Código:

    Private Sub TxtTotal_AfterUpdate()

        If Me.TxtTotal < 60 Then
            Me.TxtMensagem = "01 Parcela"
          ElseIf Me.TxtTotal >= 60 And Me.TxtTotal <= 89 Then
            Me.TxtMensagem = "02 Parcelas"
          ElseIf Me.TxtTotal >= 90 And Me.TxtTotal <= 119 Then
            Me.TxtMensagem = "03 Parcleas"
          ElseIf Me.TxtTotal >= 120 And Me.TxtTotal <= 149 Then
            Me.TxtMensagem = "04 Parcelas"
        End If
       
    End Sub

    No exemplo acima usei uma caixa de texto para receber a mensagem, más pode ser um rótulo ou mesmo uma mensagem do próprio access.

    Nivaldo.

    Marco Antonio
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 08/02/2014

    Re: mostrar menssagem informando o numero de parcelas

    Mensagem  Marco Antonio em Dom 09 Fev 2014, 01:03

    muito obrigado Nivaldo que Deus te ilumine muito

    Nivaldo
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 708
    Registrado : 08/12/2009

    Re: mostrar menssagem informando o numero de parcelas

    Mensagem  Nivaldo em Dom 09 Fev 2014, 15:02

    Obrigado pelo retorno Marco, e principalmente pela Luz.

    O forum agradece.

    Precisando é só dar um grito.


    Nivaldo.

      Data/hora atual: Sex 09 Dez 2016, 03:51