SÉPARATEUR DÉCIMAL DES NOMBRES.
cs_RENAUD34
Messages postés
18
Date d'inscription
lundi 17 mai 2004
Statut
Membre
Dernière intervention
4 octobre 2007
-
26 mars 2007 à 09:03
cs_christoni Messages postés 140 Date d'inscription mardi 25 novembre 2003 Statut Membre Dernière intervention 1 novembre 2010 - 1 avril 2007 à 11:03
cs_christoni Messages postés 140 Date d'inscription mardi 25 novembre 2003 Statut Membre Dernière intervention 1 novembre 2010 - 1 avril 2007 à 11:03
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
https://codes-sources.commentcamarche.net/source/41886-separateur-decimal-des-nombres
1 avril 2007 à 11:03
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.
26 mars 2007 à 09:03
If KeyAscii 46 Then KeyAscii 44
(ou l'inverse pour passer de virgule à point)