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

    [Resolvido]If 2 condições

    avatar
    Altair_147
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 126
    Registrado : 29/10/2010

    [Resolvido]If 2 condições Empty If 2 condições

    Mensagem  Altair_147 10/1/2011, 21:35

    Boa tarde,

    Estou precisando usar o comando IF com duas condições.

    Aqui uso da seguinte forma:

    If Me.libera_votacao = "Sim" Then
    Me.fundo.BackColor = 32768
    Me.nota_bom.Enabled = True
    Me.nota_irregular.Enabled = True
    Me.nota_otimo.Enabled = True

    Gostaria que ele verificasse se se o campo "libera_votacao" é igual a "Sim" e se o campo "Nota" é maior que "0".


    Obrigado




    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]If 2 condições Empty Re: [Resolvido]If 2 condições

    Mensagem  vieirasoft 10/1/2011, 21:40

    Boa Tarde

    Utilize o
    ElseIf nota_irregular>0

    e termine com End If
    .............................

    If Me.libera_votacao = "Sim" Then
    Me.fundo.BackColor = 32768
    Me.nota_bom.Enabled = True
    Me.nota_irregular.Enabled = True
    Me.nota_otimo.Enabled = True
    ElseIf Nota>0 Then
    sua instrução
    End If
    avatar
    Altair_147
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 126
    Registrado : 29/10/2010

    [Resolvido]If 2 condições Empty If 2 condições

    Mensagem  Altair_147 10/1/2011, 22:09

    Pelo que entendi ai é se os requisitos não atender a primeira condição ele passa para a segunda. o Que eu preciso é um condição que dependa de dois campos.

    Obrigado
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]If 2 condições Empty Re: [Resolvido]If 2 condições

    Mensagem  vieirasoft 10/1/2011, 22:16

    Não. Você pode usar a instruçaõ Elseif as vezes necessárias.

    Aqui tem um exemplo que fiz para um colega daqui do fórum e mostra o uso da instrução If

    If Caixa_de_combinação2.Text = "Cadastro Clientes" Then
    DoCmd.OpenForm "Formulário1"
    ElseIf Caixa_de_combinação2.Text = "Receita" Then
    DoCmd.OpenForm "Formulario2"
    ElseIf Caixa_de_combinação2.Text = "Despesas" Then
    DoCmd.OpenForm "Formulario3"
    ElseIf Caixa_de_combinação2.Text = "Controle Vendas" Then
    DoCmd.OpenForm "Formulario4"
    End If
    avatar
    Altair_147
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 126
    Registrado : 29/10/2010

    [Resolvido]If 2 condições Empty If 2 condições

    Mensagem  Altair_147 10/1/2011, 22:21

    Bom acho que me expliquei mal. Vou tentar descrever melhor minha dúvida, vou fazer abaixo como eu queria que fosse:

    If Me.libera_votacao = "Sim" e se me.nota = 0 Then
    Me.fundo.BackColor = 32768
    Me.nota_bom.Enabled = True
    Me.nota_irregular.Enabled = True
    Me.nota_otimo.Enabled = True
    end if



    Entende, quero que se o campo "libera_votacao" for igual a "Sim" e "me.nota" tem que ser igual a "0" para que aconteça:

    Me.fundo.BackColor = 32768
    Me.nota_bom.Enabled = True
    Me.nota_irregular.Enabled = True
    Me.nota_otimo.Enabled = True

    Obrigado

    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]If 2 condições Empty Re: [Resolvido]If 2 condições

    Mensagem  vieirasoft 10/1/2011, 22:24

    If Me.libera_votacao = "Sim" And Me.nota >= 0 Then
    Me.fundo.BackColor = 32768
    Me.nota_bom.Enabled = True
    Me.nota_irregular.Enabled = True
    Me.nota_otimo.Enabled = True
    End If
    avatar
    Altair_147
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 126
    Registrado : 29/10/2010

    [Resolvido]If 2 condições Empty If 2 condições

    Mensagem  Altair_147 10/1/2011, 22:34

    Exatamente o que precisava.

    Muito Obrigado.
    vieirasoft
    vieirasoft
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7304
    Registrado : 11/05/2010

    [Resolvido]If 2 condições Empty Re: [Resolvido]If 2 condições

    Mensagem  vieirasoft 10/1/2011, 22:35

    Obrigado pelo retorno e volte sempre

    Conteúdo patrocinado


    [Resolvido]If 2 condições Empty Re: [Resolvido]If 2 condições

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/4/2024, 10:55