URGENT - Probleme avec le format millier

Question

Salut à tous,

Voila mon problème, je veux récupérer dans une variable numérique le contenu d'un textbox du format suivant: 
"1 000,00 ?"
-pour supprimer l'espace plus le symbole euro (" ?") je n'ai pas de problème.
-pour remplacer la virgule par un point pas de problème.

Mon problème réside dans le fait que je ne peux pas supprimer l'espace entre le 1 et 000.00 cette "espace" résiste aux fonctions split et replace;

Que faire pour obtenir dans ma variable 1000 au lieu de 1 avec la fonction val???????

PS: Si ce séparateur de millier est absent je n'ai pas de problème de récupération.
N'oubliez pas que je suis un débutant autodidacte! 8-)

cs_rene38 · Answer

Salut

Ton "espace" en question n'est probablement pas un "vrai espace" (Chr(32))
Essaie de déterminer son code ASCII en faisant par exemple
MsgBox Asc(Mid(Text1.Text, 2, 1)) 
[ou MsgBox Asc(Mid(Text1.Text, 3, 1))  s'il y a un autre espace devant le 1 de "1 000,00"]
Tu pourras ensuite utiliser la fonction Replace
Variable = Replace(Text1.Text, Chr(???), "") où "???" est le code ASCII trouvé précédemment.

linkwang · Answer

salut,
y'a aussi une autre méthode, qui te garantie la conversion de type de données. En effet, une fois que tu as supprimé le " ?", tu peux directement convertir ton texte en décimal avec CDEC(), en long avec CLNG() ou encore en entier avec CINT(), c'est super simple, et évite un nombre certain de supprise désagréable qui peuvent arriver lorque l'on laisse vb faire les conversions tout seul.

Bon courage,

LINKWANG

JMKPROD · Answer

Salut à tous,

Grand merci à Rene38 et à LINKWANG, les 2 solutions sont fonctionnelles.
Le caractère qui m'a causé tant de problèmes est le          Chr(160).
Je vais utiliser la solution de LINKWANG à cause de sa simplicité mais grâce à Rene38 jai découvert un nouveau caractère "espace".

Encore un grand merci à tous les 2 et vive vbfrance.com!

cs_rene38 · Answer

Salut
Pas de quoi.
(160 = 32 + 128)
Chr(160)  est un "espace" bien pratique :
s'affiche et s'imprime sous forme d'espace (invisible) mais n'est pas un "vrai espace".
Peut servir pour 
- des tris de chaînes de caractères : 
  Chr(160) & "A" > "B" ...
- afficher ici-même des indentations :
If Bidule Then
    '<- ici, j'ai mis 4 fois Chr(160)
Else
    '<ià, j'ai mis 4 vrais espaces
End If

linkwang · Answer

content de pouvoir aider, et c'est cool, je ne connaissais pas le 160, ca peut etre utile.

bonne continuation,

sektraore · Answer

Salut  a tous,


je dois travailler sur RIPEMD-160 mais je n'es pas trop sur ce terme.Ma question est la suivante: je souhaiterais avoir des informations sur le RIPEMD-160,a savoir comment ecrire un algorithme avec le VHDL.


merci 


Sekou

URGENT - Probleme avec le format millier

6 réponses

Discussions similaires