SÉPARATEUR DÉCIMAL DES NOMBRES.

Signaler
Messages postés
18
Date d'inscription
lundi 17 mai 2004
Statut
Membre
Dernière intervention
4 octobre 2007
-
Messages postés
140
Date d'inscription
mardi 25 novembre 2003
Statut
Membre
Dernière intervention
1 novembre 2010
-
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/41886-separateur-decimal-des-nombres

Messages postés
140
Date d'inscription
mardi 25 novembre 2003
Statut
Membre
Dernière intervention
1 novembre 2010
5
Il est beau ce poisson, RENAUD34,
J'ai appliqué ton code, sur un TextBox nommé « tbPrixU » comme suit :

Private Sub tbPrixU_KeyPress(ByVal sender As Object, _
ByVal e As System.Windows.Forms.KeyPressEventArgs) _
Handles tbPrixU.KeyPress
If e.KeyChar = ChrW(46) Then
e.KeyChar = ChrW(44)
End If
End Sub

Private Sub tbPrixU_Validated(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles tbPrixU.Validated
tbPrixU.Text = Format(CDbl(tbPrixU.Text), "#0.00")
End Sub

Ca fonctionne bien, mais je n'ai pas trouvé de solution pour une mise en forme, autre que celle proposée par la culture anglaise.
Je sais, je chipote, mais j'aimerais la virgule.
Je modifie ma source avec 2 exemples.
Messages postés
18
Date d'inscription
lundi 17 mai 2004
Statut
Membre
Dernière intervention
4 octobre 2007

on peut aussi changer le point en virgule en mettant dans la fonction "keypress" de la zone de saisie le code:

If KeyAscii 46 Then KeyAscii 44

(ou l'inverse pour passer de virgule à point)