Comparaison de deux valeurs numériques ne fonctionnant pasRésolu

Question

Bonjour tout le monde, Je compare deux valeurs numériques : If Val(textMontantInsere.Text) < Val(textMontantDu.Text) Then textMontantInsere.Text = > 0,05 textMontantDu.Text => 0,50 € il dit en fait que ce n'est pas vrai et il va dans le else : If Val(textMontantInsere.Text) < Val(textMontantDu.Text) Then 'je vérifie que le montant inséré soit inférieure au montant dû, si c'est le cas, j'empêche l'appui sur le bouton d'achat commandAcheterBoisson.Enabled = False '#### NOTE IMPORTANTE #### il faut utiliser val(objet.text) pour comparer les deux valeurs Else commandAcheterBoisson.Enabled = True End If il active donc le bouton alors que tant que la somme insérée est inférieure à la somme dûe, le bouton ne devrait pas apparaître. Je ne comprends pas pourquoi le signe € apparaît aussi dans textMontantDu.Text alors que j'utilise val pour trasnformer le text en numérique. Merci d'avance pour votre aide et bon Dimanche. beegees

cs_casy · Accepted Answer

Un problème de symbole décimal entre la virgule et le point.

La fonction Val ne reconnait que le point comme symbole décimal.

Utilise plutot CDBL à la place

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php

beegeezzz · Answer

Salut Casy et merci pour ta réponse.

En effet, le problème était là.

Je ne savais pas que la virgule posait problème au val.

Problème résolu.

@+

beegeezzzz

Comparaison de deux valeurs numériques ne fonctionnant pas

2 réponses

Votre réponse

Discussions similaires