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

    [Resolvido]condiçoes num loop

    Compartilhe

    cpampas
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 32
    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?

    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 5889
    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 : 32
    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

    Avelino Sampaio
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3350
    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


    .................................................................................
    ============ Quer aprender Access em alta velocidade ? ============

    || [Você precisa estar registrado e conectado para ver esta imagem.] Acesse o site UsandoAccess.com.br e veja um ótimo kit de ensino que tenho para você.

    ===========================================================

    cpampas
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 32
    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: Sex 09 Dez 2016, 11:33