O Teu Mundo - Muito mais do que possas imaginar...
14.- Loop WHILE WEND Americ10

Bem-vindo ao O Teu Mundo!
Registre-se, conecte-se para ter acesso ao forum por completo, ainda podera ter um perfil que pode ser modificado com css e muito mais...



14.- Loop WHILE WEND

Ir em baixo

14.- Loop WHILE WEND Empty 14.- Loop WHILE WEND

Mensagem por Miguel Rocha em Qui Mar 25, 2010 1:03 pm

O loop WHILE...WEND serve para realizar um tipo de loop muito utilizado em programação que é o loop Enquanto, que se executa enquanto se cumprir uma condição. A diferença do loop FOR é que este se utiliza quando não conhecemos o número de iterações que temos que realizar.

O loop funciona da seguinte maneira. Quando se vai executar, avalia uma expressão e comprova que esta dá resultados positivos. Se for assim, executa o corpo do loop (as sentenças que continuam até o WEND), em caso contrário se sai. Podemos ver a sintaxe a seguir.

Código:
WHILE (condicao)
          sentencas
          ....
WEND

Agora vamos ver um pequeno exemplo sobre este loop, que realiza uma conta número a número até chegar ao 13. Em cada iteração do loop mostra em uma janelinha o número atual e oferece a possibilidade de altera-lo, já que a janelinha é uma janela Input, que oferece a oportunidade de mudar o valor e devolve esse valor, mudado ou não. Como dizíamos, se deixarmos o exemplo sem tocar nada, contará até 13, mas se introduzirmos um número no inputbox continuará a conta pelo número introduzido. Se o número introduzido for maior que 13 também sairá do loop.

Código:
option explicit
dim a
a = 0
WHILE (a < 13)
  a = a + 1
  a = inputbox("Dá-me um valor inteiro, please","Petição de número",a,200,100)
WEND

_______________________________________________
Olá Convidado, actualmente este fórum tem 33 membros, 114 categorias , 433 tópicos e 793 posts, mas apenas 0 são teus !
Vá Convidado , tens de postar mais !

Miguel Rocha
Administrador
 Administrador

Masculino Mensagens : 692
Pontos : 22478
Reputação : 11
Idade : 27
Localização : Porto


Voltar ao Topo Ir em baixo

Voltar ao Topo


 
Permissão deste fórum:
Você não pode responder aos tópicos neste fórum