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

    [Resolvido]condiçoes num loop

    Compartilhe

    cpampas
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 35
    Registrado : 27/10/2013

    [Resolvido]condiçoes num loop

    Mensagem  cpampas em Sab 08 Out 2016, 22:59

    Bom dia,

    Estou com dificuldade em validar as condiçoes neste loop :

    Código:
    i=2
    qtosmedia=3
    qtasLinhas=2

    While Not (i = qtosMedia) Or (qtasLinhas < qtosMedia And i = qtasLinhas)

    ' Embora  seja <qtosMedia e i=2 , continua no loop, porque ?
    Wend

    O que faço de errado?
    avatar
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 6505
    Registrado : 05/11/2009

    Re: [Resolvido]condiçoes num loop

    Mensagem  Alexandre Neves em Sab 08 Out 2016, 23:50

    Boa noite,
    Não sei o que pretende, mas veja a condição que colocou
    1ª parte: Not (i = qtosMedia)
    enquanto i for diferente de qtosMedia, a condição verifica-se e mantém a execução do ciclo
    (esta parte é verdadeira e suficiente para que não seja necessário analisar a 2ª condição porque a condição entre as partes é disjuntiva (basta uma das condições ser verdadeira para a condição ser verdadeira)

    2ª parte: (qtasLinhas < qtosMedia And i = qtasLinhas)
    enquanto qtasLinhas for menor que qtosMedia e i for igual a qtasLinhas, a condição verifica-se e mantém a execução do ciclo

    Convinha esclarecer o que pretende avaliar com a condição, de forma a enunciar devidamente


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

    cpampas
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 35
    Registrado : 27/10/2013

    Re: [Resolvido]condiçoes num loop

    Mensagem  cpampas em Dom 09 Out 2016, 11:51

    Bom dia,
    O que ´pretendo é sair do loop nestas condiçoes :

    1 - No caso de qtosMedia = 3 , neste caso =False

    ou em alternativa no caso em que:
    2 - qtasLinhas < qtosMedia , o que neste caso = True e qtasLinhas < i = qtasLinha, que neste caso tb e True.

    ou seja se as 2 condiçoes no ponto 2 sao true porque nao sai do loop?
    obrigado
    avatar
    Avelino Sampaio
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3410
    Registrado : 04/04/2010

    Re: [Resolvido]condiçoes num loop

    Mensagem  Avelino Sampaio em Dom 09 Out 2016, 13:21

    Olá!

    Acrescente os parênteses, para ser analisado como um único conjunto.

    While Not ((i = qtosMedia) Or (qtasLinhas < qtosMedia And i = qtasLinhas))


    Aguardamos

    cpampas
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 35
    Registrado : 27/10/2013

    Re: [Resolvido]condiçoes num loop

    Mensagem  cpampas em Dom 09 Out 2016, 13:49

    Avelino,
    Funcionou perfeitamente
    obrigado

      Data/hora atual: Qui 23 Nov 2017, 15:05