Virgule et point

Salut,
j'ai beau chercher je trouve pas de soluce qui fonctionne pour mon problème:
je saisie une valeur dans un textbox, si je met 12,23 no pb mais si je met 12.23 erreur d'exécution 13 type incompatible, mais en essayant les propositions que j'ai trouvé ça fonctionne pas.
Je précise que je fait un calcul (multiplication par un nombre fixe après)

Est ce qu'il faut mettre un type de variable spécifique ?

Merci d'avance pour vos réponses.

Dim maVariable as currency maVariable=val(text1.text)

Ca convertira le point en virgule

Grrrrrrrrrrr

Sinon tu fais pour que tout le points soient remplacer par une virgule en ajoutant ce code :

Dim res As Long ' Variable pour la recherche res = InStr(1, Text1, ".") ' effectue une recherche If res <> 0 Then Text1.SelStart = res - 1 ' possitionne la selection au point Text1.SelLength = 1 ' Selectionne qu'un seul carractères Text1.SelText = "," ' change la selection (le point) par la virgule End If Text1.SelStart = 0 Text1.SelLength = 0

Change Text1 par le nom de ton TextBox

Voila

Ya plus simple je pense ke ca c bon :
Text2.Text = Replace(Text1.Text, ".", ",") * 2

ou bien Text1.Text = Replace(Text1.Text, ".", ",") si le "texte" (le nombre dans la textbox) arrive par le code

Si on saisit le nombre,
Private Sub Text1_KeyPress(KeyAscii As Integer)
   If KeyAscii = 46 Then KeyAscii = 44
' écrit une virgule si on saisit un point
End Sub

le pb en mettant val(text1.text) est que dans ce k si l'utilisateur entre une "," alors vb calculera avec les chiffres avant la virgule et n'affichera aucun message d'erreur. Pour ma part bien que cela est l'air moins prof je pref passer par le remplacement du "." par une virgule, ça limite le champs d'erreur je pense