VB6 FormatRésolu

Question

Bonjour &#224; tous...

J'aimerais savoir comment on fait pour faire une condition &#224; savoir sir mon textbox ressemble &#224; 0,2244 alors aucune modification du textbos
Sinon si mon textbox ressemble &#224; ,2244 alors mettre un 0 avant le virgule.

&#192; noter qu'il y aura plein de possibilit&#233; du contenu du textbox, le 0,2244est un exemple...

If txtVertical <> "@,@@@@" Then
        txtVertical.Text = "0" & txtVertical.Text
End If

J'ai essay&#233; ce code mias ca ne fonctionne pas...

Qu'est ce que je ne fais pas de correct...

Merci d'avance..

addamsmercredi · Accepted Answer

Tu peux comme ceci sans aucun test :


Text1.Text = Val(0 & Replace(Text1.Text, ",", "."))


Les 0 inutiles sont automatiquement supprim&#233;s.

cs_moustachu · Answer

Bonjour
Par exemple, tu peux faire

If left(trim(textbox1.text)=',' then
    textbox1.text = "0" & textbox1.text
end if

++
Moustachu

cs_JeffC1977 · Answer

Salut...

J'ai essay&#233; ton exemple... hum   ca ne fonctionne pas ce me sort comme erreur...

Erreur de compilation:
Nombre d'arguments incorect ou affectation de propri&#233;t&#233; incorrect

Voici le code..

If Left(Trim(txtVertical.Text) = ",") Then
        txtVertical.Text = "0" & txtVertical.Text
End If

merci d'avance