Affichage de virgule

Résolu
haticat Messages postés 12 Date d'inscription mardi 17 mars 2009 Statut Membre Dernière intervention 20 décembre 2010 - 27 oct. 2008 à 12:14
haticat Messages postés 12 Date d'inscription mardi 17 mars 2009 Statut Membre Dernière intervention 20 décembre 2010 - 27 oct. 2008 à 13:52
bonjours, voila mon problème lorsque j'ajoute deux valeurs l' une vient d'une déclaration tel que:Private Sub Combo1_Click()
  Select Case (Combo1.Text)
                 Case Is = "gradin"
                    Text1.Text = "1816,66"l'autre vient d'un textbox par exemple : text3.text val(text1.text)+val(text2.text)   ,sachant que le nombre affecter a text2.text52.36 le total sera 1869.02 alors que dans mon petit programme il n'est que 1868.36c'est a dire il ne prend pas en charge la virgule declarée dans text1.text qui est "1816.66".il ne prend que la virgule de la valeur declarée dans text2.text 
merci pour votre patience

5 réponses

jmfmarques Messages postés 7666 Date d'inscription samedi 5 novembre 2005 Statut Membre Dernière intervention 22 août 2014 27
27 oct. 2008 à 12:18
Bonjour,

l'utilisation de val implique le point utilisé comme séparateur décimal.
or, tu as écrit :
Text1.Text = "1816,66"
3
jmfmarques Messages postés 7666 Date d'inscription samedi 5 novembre 2005 Statut Membre Dernière intervention 22 août 2014 27
27 oct. 2008 à 12:19
Et tu ne déceloppes apparemment pas sous  Thèmes / VB.NET et VB 2005
mais sous VB6 !!!!
0
lillith212 Messages postés 1229 Date d'inscription vendredi 16 novembre 2007 Statut Membre Dernière intervention 16 juin 2009
27 oct. 2008 à 12:46
Bonjour,

la fonction val retourne un type variant, ce n'est pas recommandé...
utilise la fonction CInt et si tu as toujours le point utilise
Replace(expression,find,replacewith[,start[,count[,compare]]])
expression = chaine
find = la sous chaine recherchée
replacewith = la sous chaine de remplacement
start = position de début de recherche par défaut à 1 --> Facultatif
count = nombre de remplacement à effectuer par défaut -1 donc tous --> Facultatif
compare = Valeur numérique indiquant le type de comparaison à utiliser. --> Facultatif

Bon courage

S.L.B.
<hr />-- Le règlement tu liras -- Des recherches tu feras -- Le style SMS tu banniras --
-- De la validation pertinente tu feras -- Du respect tu auras -- <
0
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 74
27 oct. 2008 à 13:18
c'est laid...
Text1.Text = "1816,66"

faire plutot :
Text1.Text = FormatNumber(1816.66, 2)
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
haticat Messages postés 12 Date d'inscription mardi 17 mars 2009 Statut Membre Dernière intervention 20 décembre 2010
27 oct. 2008 à 13:52
slt ,oui c'est ça.la faute c'est que je n'ai pas fait attention, j'ai copié collé ces valeurs à partir d'une feuille d'excel ,qui n'utilise que la virgule, excel traduit le point en virgule .
merci infiniment
0
Rejoignez-nous