Corrige le type de donnée de ta variable :
Dim mario As Currency
Trouvés dans MSDN version 6
---------------------------
Si la variable contient une fraction, déclarez-la comme une variable Single, Double ou Currency. Le type de données Currency admet jusqu'à quatre décimales et quinze chiffres avant la virgule. Ce type de données est précis et convient parfaitement aux calculs monétaires. Les nombres à virgule flottante (Single et Double) disposent de plages beaucoup plus larges que Currency, mais peuvent comporter de petites erreurs d'arrondissement.
Je dois admettre que c'était une bonne question. Je n'y avait jamais pris garde avant et je me suis gratté la tête une bonne heure avant de trouver quelque chose.