Discussion :

[BenoitM]

Bonjour,

J'ai ces deux lignes de code.
Pour moi elles font la même chose, une avec un If Else End If, l'autre avec un IIF
Mais quand j'exécute le code et que CType(ds.Tables("T").Rows.Find(z)(Column + 1), Decimal)=0D le If va bien dans la clause Else mais le IIF va dans la cause True et j'obtiens une division par 0.
Avez-vous déjà rencontrer des problèmes avec le Iif?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
 
If (CType(ds.Tables("T").Rows.Find(z)(Column + 1), Decimal) <> 0) Then
      row(Column + 1) = CType(ds.Tables("T").Rows.Find(x)(Column + 1), Decimal) / CType(ds.Tables("T").Rows.Find(z)(Column + 1), Decimal)
Else
      row(Column + 1) = 0
End If
 
 
row(Column + 1) = IIf(CType(ds.Tables("T").Rows.Find(z)(Column + 1), Decimal) <> 0, CType(ds.Tables("T").Rows.Find(x)(Column + 1), Decimal) / CType(ds.Tables("T").Rows.Find(z)(Column + 1), Decimal), 0)

[olsimare]

Bonjour.

C'est parce que le IIF évalue toute ces composantes (--> valeur si vrai et valeur si faux), avant de tester.

Essayes ce code, tu verras, c'est impressionant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
Public Class testIIF
 
    Public ReadOnly Property A() As Integer
        Get
            MsgBox("Eval A")
            Return 1
        End Get
    End Property
    Public ReadOnly Property B() As Integer
        Get
            MsgBox("Eval B")
            Return 2
        End Get
    End Property
 
End Class
 
' Et dans une form ou autre
        Dim t As New testIIF
        Dim d As Decimal = 0
        Dim c As Decimal
        c = CType(IIf(d > 0, t.A, t.B), Decimal)

A proscrire dans ton cas donc ...

D'ailleurs, c'est de maniére générale pas génial ce Iif, même si je l'utilise aussi !

Cdt.

[BenoitM]

Merci pour ton explication et ton exemple

Je pensais pas que c'était si bête un IIF
C'est quand même moche qu'il évalue les deux clauses...

Au moins, je ne suis pas fou, je vais les remplacer par des if else end if mais bon je trouvais ca plus joli d'écrire le code en 1 ligne


Encore Merci

[Aspic]

Non je te conseille de ne pas utiliser le iif, car il a été remplacé par le If Else ElseIf et c'est plus propre même si c'est codé sur 3 lignes ! De plus, attention au risque d'erreur en utilisant le iif...