VB.Net Remplacer le Point par une Virgule

Question

Salut...

Je suis à la recherche de comment faire pour que si l'utilisatuer utilise un point, dans mon textbox il y aura une virgule.

J'ai trouvé ce code sur vbfrance mais ca marche pas, j'ai une erreur... Si quelqu'un peut me donner un coup de main  

merci d'avance

P.S. Erreur en Gras et Souligné plus bas. 1.Handles clauses requires a WithEvents variable defined in the containing type or one of its bases types
2. Property 'KeyChar' is 'ReadOnly'

Private
Sub decimaltxt_KeyPress(
ByVal sender 
As
Object, 
ByVal e 
As System.Windows.Forms.KeyPressEventArgs) 
Handles decimaltxt.KeyPress 

'on accepte chiffres et virgule, ainsi que la touche back. On remplace un eventuel point par une virgule, et on refuse la saisie d'une virgule en tant que premier caractere
'remplacement du point par une virgule

If Asc(e.KeyChar) =  46 
Then e.KeyChar =  
","
'si c'est une virgule et qu'il y en a déja une dans le textbox, ou qu'elle est tappé en premier caractère, on annule la saisie
If Asc(e.KeyChar)  = 44 
And (
CType(sender, TextBox).Text.IndexOf(
",") > 0 
Or
CType(sender, TextBox).Text = 
"") 
Then e.Handled = 
True

End
Sub

Big200148 · Answer

A la place de e.KeyChar tu met ton textbox.replace(",",".")

cs_JeffC1977 · Answer

Le prob. c'est que j'ai plein de textbox et c'est dans un Keypress donc ce devrait le faire à chauqe fois que j'appuis sur la touche Point...

Big200148 · Answer

Dans ce cas la tu fait sender.text.replace(",",".")

cs_JeffC1977 · Answer

ok ca marche pas plus...  Le maudit Compact Framework...
Je programme avec CompactFramework et je croyais que j'aurais été bon de coder cette partie de code comme si je n'était pas avec la version Compact
 
Merci de ton aide...

VB.Net Remplacer le Point par une Virgule

4 réponses

Votre réponse

Discussions similaires