Bonjour !

Voila j'ai un petit souci a faire arrondir correctement un chiffre avec 4 décimales..

Voici les détails :

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
        'Call des variables
        Dim qteItem As String = datagridviewListeItems.CurrentRow.Cells(0).Value
        Dim prixItem As String = datagridviewListeItems.CurrentRow.Cells(4).Value ' < Le prix unitaire du produit
        Dim tauxTaxe1 As String = lblTauxTaxe1.Text / 100
        Dim tauxTaxe2 As String = lblTauxTaxe2.Text / 100
        Dim prixTotalItem As String = qteItem * prixItem ' < Multiplier la quantité du produit par le prix unitaire pour avoir le prixTotalItem a taxer
 
        'Montant des taxes selon la configuration de l'item
      Dim montantTaxe1 As String = prixTotalItem * tauxTaxe1
        montantTaxe1 = Format(CType(montantTaxe1, Double), "#0.00") 'Lorsque ce code est ajouté, le round ne se fait pas bien.. 
        Dim montantTaxe2 As String = prixTotalItem * tauxTaxe2
        montantTaxe2 = Format(CType(montantTaxe2, Double), "#0.00") 'Lorsque ce code est ajouté, le round ne se fait pas bien.. 
 
        'Calcul du prix total de l'item avec taxes
        Dim prixTotalAvecTaxes As String = Val(prixTotalItem) + Val(montantTaxe1) + Val(montantTaxe2)
        prixTotalAvecTaxes = Format(CType(prixTotalAvecTaxes, Double), "#0.00")
Mon problème se trouve entre les lignes 9 et 12
Lorsque je n'utilise rien pour arrondir mon chiffre voici les résultats: (Enleve ligne 9 et 11)
http://i.imgur.com/i00yp13.png

et lorsque je rajoute le code aux lignes 10 et 12 voici les résultats:
http://i.imgur.com/OyDf0Sm.png

Vérifier vis-a-vis T.P.S .. le chiffre après l'arrondissment est 8.52 .. mais il devrait rester a 8.51 .. mais celui vis a vis T.V.Q est correct... il est rester a 16.98 et non 16.99

Merci ! Si je ne suis pas assez claire, veuillez m'en aviser

Framework: 4.5.2 > Using VS2013