Boucle while

Fermé
mylord666 Messages postés 151 Date d'inscription jeudi 26 juin 2014 Statut Membre Dernière intervention 9 septembre 2015 - 16 août 2014 à 17:31
mylord666 Messages postés 151 Date d'inscription jeudi 26 juin 2014 Statut Membre Dernière intervention 9 septembre 2015 - 17 août 2014 à 22:11
Bonjour,


peut on avoir deux compteur sur une même boucle du style*
while i=2 and j=8

10 réponses

Utilisateur anonyme
16 août 2014 à 17:35
Bonjour,

pour évaluer une condition ( resultat booleen ), il suffit de la mettre entre parentheses

Cordialement



0
Iama Messages postés 319 Date d'inscription mercredi 13 janvier 2010 Statut Membre Dernière intervention 27 mars 2020 14
16 août 2014 à 17:36
bonjour
A ma connaissance il faut faire une boucle dans une boucle.
cordialement
0
Utilisateur anonyme
16 août 2014 à 17:45
C'est possible de la faire comme ça mais si la premiere condition n'est plus remplie la seconde elle peut l'etre. Il s'agit donc bien d'utiliser l'operateur AND dans un seul while.

Pour ce que tu proposes :

WHILE J=10

WHILE K=1
.....
WEND

WEND

Si J n'est plus egal à 10, mais que K = 1 tu ne sortiras pas de ta boucle
0
mylord666 Messages postés 151 Date d'inscription jeudi 26 juin 2014 Statut Membre Dernière intervention 9 septembre 2015
16 août 2014 à 22:07
j'ai testé mais cela bloque la sortie d eboucle n'est pas top merci beaucoup je vais tester pour avoir une bonne sortie de boucle
0
Iama Messages postés 319 Date d'inscription mercredi 13 janvier 2010 Statut Membre Dernière intervention 27 mars 2020 14
17 août 2014 à 11:28
bonjour ludobabs

bien vu
0
Normad Messages postés 112 Date d'inscription dimanche 6 juin 2010 Statut Membre Dernière intervention 10 juin 2015 37
17 août 2014 à 09:07
Bonjour,

Personnellement j'écrirais plutôt :

    Do While i + j = 10
' 2e contôle, si echec sortie de la boucle
If i <> 2 Then Exit Do
'suite du code...

Loop
0
re

Dim i As Integer =2
Dim j As Integer = 10

While ( i = 2 and j = 10 )
 ...    
End While 


cdt
En informatique 99% des problèmes se situent entre le fauteuil et le clavier
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
mylord666 Messages postés 151 Date d'inscription jeudi 26 juin 2014 Statut Membre Dernière intervention 9 septembre 2015
17 août 2014 à 15:26
bonjour
merci de ce code
je ne sias pas comment finir ce code près Loop je sais pas terminer
merci encore de m'iader
0
ccm81 Messages postés 10853 Date d'inscription lundi 18 octobre 2010 Statut Membre Dernière intervention 24 avril 2024 2 404
Modifié par ccm81 le 17/08/2014 à 16:08
Bonjour à tous

Comme ça n'a pas l'air d'être concluant, peux tu nous expliquer en "bon français" le contenu de ta boucle, quelque chose du genre

Tant que cettte condition est réalisée
je fais ça
puis ça
puis ça
fin tant que

Cdlmnt
0
bonjour,
si tu met :
while i=1 and j=10
...
wend
tu sortira de la boucle quand :
soit i different de 1
soit j different de 10
si tu met :
while i=1 or j=10
...
wend
tu sortira de la boucle quand :
i different de 1
ET
j different de 10
a toi de voir selon ton besoins
0
mylord666 Messages postés 151 Date d'inscription jeudi 26 juin 2014 Statut Membre Dernière intervention 9 septembre 2015
17 août 2014 à 17:20
Sub testeur()
Dim i As Integer, j As Integer, index As Integer

i = 2: j = 2

While i < 9
'ecrire sur une ligne
For j = 2 To 6
Cells(i, j).Value = InputBox("montant")
Next j
'incrementer d'une ligne
i = i + 1
j = 2
Wend

End Sub

voici ce que j'ai ecris cela fonctionne bien peut être que c'est pa sorthodoxe mais bon le résultat est là ce cegrace à vous merci beaucou^p
0
bonjour,
si ca marche c'est quoi que tu veux faire et qui ne marche pas ?
et aussi pourquoi tu n'imbrique pas 2 boucles for ?

Sub testeur()
for i=2 to 8
For j = 2 To 6
Cells(i, j).Value = InputBox("montant")
Next j
next i
End Sub
0
mylord666 Messages postés 151 Date d'inscription jeudi 26 juin 2014 Statut Membre Dernière intervention 9 septembre 2015
17 août 2014 à 22:11
merci beaucoup de votre aide bonne soiree
0