OVH Cloud OVH Cloud

plusieurs IF THEN

7 réponses
Avatar
Nina
Bonjour

je voudrais savoir comment est interpreté des IF THEN qui se suivent. Il
s'agit de OU ou bien de ET

exemple :
Select Case Pret_Type.Value
Case 1
If Trait_FS = 0 Or IsNull(Trait_FS) Then
If Trait_EM = 0 Or IsNull(Trait_EM) Then
'=> comment est interpreté ce second IF. Je souhaite que mes
'2 conditions soient respectées.
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
End If
Else
ETQ_T_NV.Visible = False
ETQ_T_V.Visible = True
End If

Merci de votre aide
N.

7 réponses

Avatar
Jessy Sempere [MVP]
Bonjour

tu auras bien tes 2 conditions qui seront respectées...

Access testera ton 2ème IF uniquement si la première
condition est respectée, ensuite il testera le 2ème et si
cette condition est aussi respecté, il fera les instructions
qui suivent ton Then

En gros :

If condition1 then
if condition 2 then
{instruction si les 2 sont respectées}
else
{instruction si seulement la première est respectée}
end if
else
{instruction si aucune des 2}
end if

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Nina" a écrit dans le message news:

Bonjour

je voudrais savoir comment est interpreté des IF THEN qui se suivent. Il
s'agit de OU ou bien de ET

exemple :
Select Case Pret_Type.Value
Case 1
If Trait_FS = 0 Or IsNull(Trait_FS) Then
If Trait_EM = 0 Or IsNull(Trait_EM) Then
'=> comment est interpreté ce second IF. Je souhaite que mes
'2 conditions soient respectées.
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
End If
Else
ETQ_T_NV.Visible = False
ETQ_T_V.Visible = True
End If

Merci de votre aide
N.




Avatar
Antoine Labusquière
Il s'agit bien de ET.
Si condition 1 respectée alors
Si condition 2 respectée alors
Faire quelquechose
fin Si
Fin Si

"Nina" a écrit dans le message de
news:
Bonjour

je voudrais savoir comment est interpreté des IF THEN qui se suivent. Il
s'agit de OU ou bien de ET

exemple :
Select Case Pret_Type.Value
Case 1
If Trait_FS = 0 Or IsNull(Trait_FS) Then
If Trait_EM = 0 Or IsNull(Trait_EM) Then
'=> comment est interpreté ce second IF. Je souhaite que mes
'2 conditions soient respectées.
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
End If
Else
ETQ_T_NV.Visible = False
ETQ_T_V.Visible = True
End If

Merci de votre aide
N.




Avatar
Eric
Bonjour,
Comme l'ont fait remarquer Jessy et Antoine, il s'agit bien d'un ET

Mais, à moins d'avoir mal lu ...
ta 2ème condition ne joue pas car qu'elle soit réalisée ou non tu fais le
même traitement :
If Trait_EM = 0 Or IsNull(Trait_EM) Then
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
End If



--
A+
Eric
Lien à suivre : http://users.skynet.be/mpfa/

"Nina" écrivait
news::

Bonjour

je voudrais savoir comment est interpreté des IF THEN qui se suivent.
Il

s'agit de OU ou bien de ET

exemple :
Select Case Pret_Type.Value
Case 1
If Trait_FS = 0 Or IsNull(Trait_FS) Then
If Trait_EM = 0 Or IsNull(Trait_EM) Then
'=> comment est interpreté ce second IF. Je souhaite que mes
'2 conditions soient respectées.
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
End If
Else
ETQ_T_NV.Visible = False
ETQ_T_V.Visible = True
End If

Merci de votre aide
N.





Avatar
Nina
ok merci pour ces infos...
Il me faut donc ecrire pour mon probleme
If (Trait_FS = 0 Or IsNull(Trait_FS)) And (Trait_EM = 0 Or
IsNull(Trait_EM)) Then
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = False
ETQ_T_V.Visible = True
End If

Et ca marche....merci a vous.

"Eric" a écrit dans le message de news:

Bonjour,
Comme l'ont fait remarquer Jessy et Antoine, il s'agit bien d'un ET

Mais, à moins d'avoir mal lu ...
ta 2ème condition ne joue pas car qu'elle soit réalisée ou non tu fais le
même traitement :
If Trait_EM = 0 Or IsNull(Trait_EM) Then
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
End If



--
A+
Eric
Lien à suivre : http://users.skynet.be/mpfa/

"Nina" écrivait
news::

Bonjour

je voudrais savoir comment est interpreté des IF THEN qui se suivent.
Il

s'agit de OU ou bien de ET

exemple :
Select Case Pret_Type.Value
Case 1
If Trait_FS = 0 Or IsNull(Trait_FS) Then
If Trait_EM = 0 Or IsNull(Trait_EM) Then
'=> comment est interpreté ce second IF. Je souhaite que mes
'2 conditions soient respectées.
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
End If
Else
ETQ_T_NV.Visible = False
ETQ_T_V.Visible = True
End If

Merci de votre aide
N.







Avatar
Charles ERNST
Plus simple :

dim n as integer
n = (NZ(Trait_FS,0) + NZ(Trait_EM,0))=0
ETQ_T_NV.Visible = n
ETQ_T_V.Visible = not n





"Nina" a écrit dans le message de
news: %
ok merci pour ces infos...
Il me faut donc ecrire pour mon probleme
If (Trait_FS = 0 Or IsNull(Trait_FS)) And (Trait_EM = 0 Or
IsNull(Trait_EM)) Then
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = False
ETQ_T_V.Visible = True
End If

Et ca marche....merci a vous.

"Eric" a écrit dans le message de news:

Bonjour,
Comme l'ont fait remarquer Jessy et Antoine, il s'agit bien d'un ET

Mais, à moins d'avoir mal lu ...
ta 2ème condition ne joue pas car qu'elle soit réalisée ou non tu fais le
même traitement :
If Trait_EM = 0 Or IsNull(Trait_EM) Then
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
End If



--
A+
Eric
Lien à suivre : http://users.skynet.be/mpfa/

"Nina" écrivait
news::

Bonjour

je voudrais savoir comment est interpreté des IF THEN qui se suivent.
Il

s'agit de OU ou bien de ET

exemple :
Select Case Pret_Type.Value
Case 1
If Trait_FS = 0 Or IsNull(Trait_FS) Then
If Trait_EM = 0 Or IsNull(Trait_EM) Then
'=> comment est interpreté ce second IF. Je souhaite que mes
'2 conditions soient respectées.
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
End If
Else
ETQ_T_NV.Visible = False
ETQ_T_V.Visible = True
End If

Merci de votre aide
N.











Avatar
Antoine Labusquière
Plus court, certainement.
Plus simple, je suis pas convaincu. Ca se lit mon intuitivement, quand même
:)

Et pis si on commence à optimiser le code, où va t-on ??? ;o)


"Charles ERNST" a écrit dans le message de
news:
Plus simple :

dim n as integer
n = (NZ(Trait_FS,0) + NZ(Trait_EM,0))=0
ETQ_T_NV.Visible = n
ETQ_T_V.Visible = not n





"Nina" a écrit dans le message de
news: %
ok merci pour ces infos...
Il me faut donc ecrire pour mon probleme
If (Trait_FS = 0 Or IsNull(Trait_FS)) And (Trait_EM = 0 Or
IsNull(Trait_EM)) Then
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = False
ETQ_T_V.Visible = True
End If

Et ca marche....merci a vous.

"Eric" a écrit dans le message de news:

Bonjour,
Comme l'ont fait remarquer Jessy et Antoine, il s'agit bien d'un ET

Mais, à moins d'avoir mal lu ...
ta 2ème condition ne joue pas car qu'elle soit réalisée ou non tu fais
le



même traitement :
If Trait_EM = 0 Or IsNull(Trait_EM) Then
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
End If



--
A+
Eric
Lien à suivre : http://users.skynet.be/mpfa/

"Nina" écrivait
news::

Bonjour

je voudrais savoir comment est interpreté des IF THEN qui se suivent.
Il

s'agit de OU ou bien de ET

exemple :
Select Case Pret_Type.Value
Case 1
If Trait_FS = 0 Or IsNull(Trait_FS) Then
If Trait_EM = 0 Or IsNull(Trait_EM) Then
'=> comment est interpreté ce second IF. Je souhaite que mes
'2 conditions soient respectées.
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
End If
Else
ETQ_T_NV.Visible = False
ETQ_T_V.Visible = True
End If

Merci de votre aide
N.















Avatar
Charles ERNST
Surtout si on se fait payer à la ligne.....


"Antoine Labusquière" a écrit dans le
message de news: creiap$42v$
Plus court, certainement.
Plus simple, je suis pas convaincu. Ca se lit mon intuitivement, quand
même
:)

Et pis si on commence à optimiser le code, où va t-on ??? ;o)


"Charles ERNST" a écrit dans le message de
news:
Plus simple :

dim n as integer
n = (NZ(Trait_FS,0) + NZ(Trait_EM,0))=0
ETQ_T_NV.Visible = n
ETQ_T_V.Visible = not n





"Nina" a écrit dans le message de
news: %
ok merci pour ces infos...
Il me faut donc ecrire pour mon probleme
If (Trait_FS = 0 Or IsNull(Trait_FS)) And (Trait_EM = 0 Or
IsNull(Trait_EM)) Then
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = False
ETQ_T_V.Visible = True
End If

Et ca marche....merci a vous.

"Eric" a écrit dans le message de news:

Bonjour,
Comme l'ont fait remarquer Jessy et Antoine, il s'agit bien d'un ET

Mais, à moins d'avoir mal lu ...
ta 2ème condition ne joue pas car qu'elle soit réalisée ou non tu fais
le



même traitement :
If Trait_EM = 0 Or IsNull(Trait_EM) Then
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
End If



--
A+
Eric
Lien à suivre : http://users.skynet.be/mpfa/

"Nina" écrivait
news::

Bonjour

je voudrais savoir comment est interpreté des IF THEN qui se suivent.
Il

s'agit de OU ou bien de ET

exemple :
Select Case Pret_Type.Value
Case 1
If Trait_FS = 0 Or IsNull(Trait_FS) Then
If Trait_EM = 0 Or IsNull(Trait_EM) Then
'=> comment est interpreté ce second IF. Je souhaite que mes
'2 conditions soient respectées.
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
Else
ETQ_T_NV.Visible = True
ETQ_T_V.Visible = False
End If
Else
ETQ_T_NV.Visible = False
ETQ_T_V.Visible = True
End If

Merci de votre aide
N.