Discussion :

[jfdmagic]

bonjour à tous :

j'ai un problème avec mes nombres dans ma base de données : lorsque je veux charger ou enregistrer des données de type numérique, mes virgules passent à la trappe, ce qui est très génant !

j'ai essayé de changer les propriétés dans ma base (réel long...etc !) : rien n'y fait !

Si vous avez une solution... et c'est plutôt urgent ! une poisse de dernière minute alors que tout fonctionnait bien !

Merci d'avance !

jfdmagic

PS : je ne peux pas passer en mode texte car j'ai besoin de vérifier si jmes nombres sont inférieurs ou supérieurs à une somme dans certaines de mes requêtes

[Delbeke]

Ben sans le code, c'est un peu à la boule de cristal qu'il faut se fier et la mienne n'est toujours pas rentrée de réparation.
Vois déjà si le reglage widows du point déimal n'influe pas sur le résultat (panneau de configuration windows/options regionales et linguistiques/bouton personaliser/Symbole décimal)

[jfdmagic]

le code ne va rien t'apporter....

j'importe des données de ma base et je les enregistre, c'est tout.

non, le problème vient de la configuration des propriétés de ma base qui ne sont pas pris en compte ou des options régional : mais c'est chiant : ce genre de choses, ça ne doit dépendre du PC hôte...

Edit : ça ne vient pas des options régional, je viens de vérifier et quand bien même : "20,00" ça s'écrit "20,00" partout; non ?

[OhMonBato]

Quel séparateur de décimale est défini sous WIndows le "." ou la "," ?
Y a t'il un séparateur de millier défini sous Windows ?

[jfdmagic]

il y a un séparateur de millier et le symbole de décimale est la virgule ","

en gros, je fais ça :

'blabla, je me connecte...'
j'ajoute ou je modifie des données qui proviennent d'une zone de texte dont la zone "salaire" où je bloque les caractères sauf la virgule
'blabla, j'update'

ensuite, je veux charger mes données pour les modifier par ex et ma virgule précédemment entrée, n'est plus là.

[OhMonBato]

A tout hasard, si tu mets un point décimal au lieu d'une virgule, ça donne quoi ?

[jfdmagic]

tu vas rire : une virgule (si!)

[ThierryAIM]

j'ajoute ou je modifie des données qui proviennent d'une zone de texte dont la zone "salaire" où je bloque les caractères sauf la virgule

je pressens bien que ce qui a été dit précédemment est la bonne piste

'blabla, j'update'

Comment ?

un Replace(blabla.Text, ",", ".") ne ferait-il pas l'affaire ?

d'ou le code demandé par Delbeke ...

Gag assez connu des formats numériques !!

[jfdmagic]

je te remercie de ta réponse thierry et je vais voir ce que cela donne....

Je suis débutant, ce qui explique parfois mon ignorance de certaines choses

Soit, je ne connais pas ou bien je n'y pense pas...

pour le moment, je travaille avec des entier pour ne pas bloquer l'application

Je vous tiens au courant.

Merci pour votre aide

=)

[iclic]

Bonjour jfdmagic,

L'ennui si on fait un replace est que VB dans la variable numérique
va remplacer le point par une virgule

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
17
18
19
 
    Dim calc As Currency
    Dim nomb As String
                        'valeurs rendues par la variable 
    nomb = "256,84"
    calc = 256.84                  ' 256,84
    calc = nomb                    ' 256,84
    calc = Val(nomb)               '   256   
    'la virgule est ici considérée comme caractère non numérique
    'de même que calc=val(0,86) donnerait comme valeur: 0
    nomb = "256,84"
    nomb = Replace(nomb, ",", ".") ' "256.84"
    calc = Val(nomb)               ' 256,84    change le point en virgule
    nomb = Str(calc)               ' "256.84"  change la virgule en point
    nomb = CStr(calc)              ' "256,84"
    'mais
    nomb = Str(calc)               ' "256.84"  change la virgule en point
    'et provoque
    calc = CCur(nomb)             ' erreur type incompatible

pour le moment, je travaille avec des entiers pour ne pas bloquer l'application

...j'ajoute ou je modifie des données qui proviennent d'une zone de texte dont la zone "salaire"

Et pourquoi pas pour éviter tous les problèmes avec le point et la virgule ne pas continuer de travailler avec des entiers.
Si le nombre de décimales est connu (puisque zone salaire),il suffit de multiplier par 100 tous les nombres
et à l'affichage de faire l'inverse (:100) par exemple pour avoir le nombre avec une virgule

...j'ai besoin de vérifier si mes nombres (X100) sont inférieurs ou supérieurs à une somme (X 100) dans certaines de mes requêtes

A+