OVH Cloud OVH Cloud

Et alors

4 réponses
Avatar
SLEA
Bonjour tous le monde, je voulais savoir comment je=20
pourrais faire en VB pour faire un "et alors". Pour les=20
non habitu=E9 d'algorithmique =E7a donne ca :

Si Index > 0 et alors Tab(Index) > 0 alors

Fin_Si

se qui donnerai en VB :

If Index > 0 and Tab(Index) > 0 then

end if

Le pb c'est qu'en faisant cela, si Index =3D -1 par exemple=20
VB me renvoie une erreur au niveau de Tab(Index). Normal.=20
Donc j'aimerai utiliser un "et alors" a la place du "and"=20
comme =E7a SI Index <=3D 0 il ne teste meme pas la 2=E8me=20
condition. Ce n'est effectivement plus la peine. En C,=20
le "&&" est un "et alors" mais en VB ?????????

Qqun aurait-il une id=E9e.

4 réponses

Avatar
Et j'aurai aussi la même question pour un "ou alors"

re merci
-----Message d'origine-----
Bonjour tous le monde, je voulais savoir comment je
pourrais faire en VB pour faire un "et alors". Pour les
non habitué d'algorithmique ça donne ca :

Si Index > 0 et alors Tab(Index) > 0 alors

Fin_Si

se qui donnerai en VB :

If Index > 0 and Tab(Index) > 0 then

end if

Le pb c'est qu'en faisant cela, si Index = -1 par exemple
VB me renvoie une erreur au niveau de Tab(Index). Normal.
Donc j'aimerai utiliser un "et alors" a la place du "and"
comme ça SI Index <= 0 il ne teste meme pas la 2ème
condition. Ce n'est effectivement plus la peine. En C,
le "&&" est un "et alors" mais en VB ?????????

Qqun aurait-il une idée.
.



Avatar
François Picalausa
Hello,

En vb.net, il existe AndAlso et OrElse (si mes souvenirs sont bons).
En VB6, il faut s'en passer et utiliser des if imbriqués....

--
François Picalausa (MVP VB)
http://faq.vb.free.fr --- http://msdn.microsoft.com
http://apisvb.europe.webmatrixhosting.net

a écrit dans le message de
news:1cb4801c452b3$a0d27ff0$
Et j'aurai aussi la même question pour un "ou alors"
Bonjour tous le monde, je voulais savoir comment je
pourrais faire en VB pour faire un "et alors".




Avatar
Patrice Henrio
Si cond1 etAlors Cond2 alors
Finsi

If Cond1 then
If Cond2 then
<partie then>
End If
End If

Si cond1 ouAlors cond2 then
Fin si

If Cond1 then
<partie then>
elseIf Cond2 then
<partie then>
End If

"François Picalausa" a écrit dans le message de
news:
Hello,

En vb.net, il existe AndAlso et OrElse (si mes souvenirs sont bons).
En VB6, il faut s'en passer et utiliser des if imbriqués....

--
François Picalausa (MVP VB)
http://faq.vb.free.fr --- http://msdn.microsoft.com
http://apisvb.europe.webmatrixhosting.net

a écrit dans le message de
news:1cb4801c452b3$a0d27ff0$
> Et j'aurai aussi la même question pour un "ou alors"
>> Bonjour tous le monde, je voulais savoir comment je
>> pourrais faire en VB pour faire un "et alors".




Avatar
Merci pour les réponses mais pour la solution ci dessous,
je ne pourrais pas trop faire comme ça. En fait je voulais
savoir si cela existait pour essayer de faire un code
propre.

Merci

-----Message d'origine-----
Si cond1 etAlors Cond2 alors
Finsi

If Cond1 then
If Cond2 then
<partie then>
End If
End If

Si cond1 ouAlors cond2 then
Fin si

If Cond1 then
<partie then>
elseIf Cond2 then
<partie then>
End If

"François Picalausa" a écrit dans


le message de
news:
Hello,

En vb.net, il existe AndAlso et OrElse (si mes




souvenirs sont bons).
En VB6, il faut s'en passer et utiliser des if




imbriqués....

--
François Picalausa (MVP VB)
http://faq.vb.free.fr --- http://msdn.microsoft.com
http://apisvb.europe.webmatrixhosting.net

a écrit dans le




message de
news:1cb4801c452b3$a0d27ff0$
> Et j'aurai aussi la même question pour un "ou alors"
>> Bonjour tous le monde, je voulais savoir comment je
>> pourrais faire en VB pour faire un "et alors".






.