Discussion :

[frimeman]

Bonjour à tous,


J'aimerais pouvoir séparer une chaine de caractère en deux, j'ai essayer la fonction split mais cela ne marche.

Ma chaine de caratère est par exemple : 12,50
J'aimerais obtenir dans deux variable string :

Deb = 12
Fin = 50

Ou simplement qu'on me renvoi la position de la "," dans la chaine afin de pouvoir faire ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 d = TB_longBarres."PositionVirgule" 'd est un integer
        d = d - 1
 
        Deb = TB_longBarres.Text.Substring(0, d)
        d = d + 2
        Fin = TB_longBarres.Text.Substring(d)

Si je pourrais arriver à qqch comme ca mon soucis serais réglé, mais je n'arrive pas à obtenir la position de la virgule.

J'espere que vous saurez m'aider

Merci d'avance

[Redouane]

J'aimerais pouvoir séparer une chaine de caractère en deux, j'ai essayer la fonction split mais cela ne marche.

Bnj,

Je ne sais pas porkoi ça marche dans ton cas le split, tu fais comment ? sinon, essaye avec les expressions regulieres, mais ds ton cas, je trouve que le split suffira.

Bonne courage.

[mactwist69]

Question bête mais pourquoi 125,0 n'est pas accepter ??

Il est dans les critères 5 caractères... Si c'est une question de valeur min ou max, alors teste directement la valeur...

[Kropernic]

Ou bien utiliser une maskedtextbox ?

[frimeman]

Oui c'est à cause de la valeur min et max et oui je peux le vérifier directement, je cherche aussi de se coté la, c'est possible que je trouve plus facilement de se coté la..

la valeur min de TB_distBarres est 3 et sa valeur max est 25.
mais dans tout les cas a la fin il doit etre affiché 25,00

C'est un peu comme une calculette, quand j'execute, il vérifie les limite min et max et affiche TB_distBarres au format "0,00"

[mactwist69]

Et bien ecris toi une procédure qui fais, on va dire 4 a 5 tests qui valide la valeur.

- En 1 Tu convertie le Textbox.Text en Float,
-> si a la conversion ça pète, c'est que le format n'est pas valide (2 virgules, un point, un caractère etc...) Donc penser au try catch.

- Si la conversion est bonne, Tu teste si la valeur min max (rien de plus facile)

- Si la valeur est dans la tranche valide, pour terminer tu mets dans le Textbox.Text ton float formaté "00,00".

Ça fait 3 étapes, toutes faciles. L'avantage c'est que tu ne passes pas par des méthodes String compliquées, tu travail directement avec le nombre.

Sinon l'autre solution propre c'est de travailler avec les expressions régulière (Regex)

[frimeman]

Merci merci..

je vais continuer vers une de ces possibilité, je posterais mes résultats si je trouve qqch de concluant..

[sinople]

Regarde aussi du coté du numérique updow.

[frimeman]

La fonction split marche mais disons que dans mon cas ca ne me sert pas, ou je ne sais pas m'en servir lol, c'est possible aussi

En fait mon but est de vérifier le nombre de caractère avant et apres la ","

Dans mon programme l'utilisateur ne peut entré que 5 caractère, se qui fait 12,50 (par exemple) mais je ne peux accepter 125,0 ou 1,250.
Donc il faudrait que je puisse connaitre la position de la "," pour limiter les entrée au format 12,50.

Je sais pas si je suis trés clair dans mes explications?!

pour l'instant j'utilise ca :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
 If DetTab = 0 Then
            If DetTab = 0 And TB_distBarres.TextLength < 5 Then
 
                d = TB_distBarres.SelectionStart
 
                Deb = TB_distBarres.Text.Substring(0, d)
                Fin = TB_distBarres.Text.Substring(TB_distBarres.SelectionStart)
                TB_distBarres.Text = Deb & "0" & Fin
 
                TB_distBarres.SelectionStart = d + 1
                TB_distBarres.Select()
                Exit Sub
            ElseIf DetTab = 0 And TB_distBarres.Text = "" Then
                TB_distBarres.SelectionStart = TB_distBarres.TextLength
                TB_distBarres.Select()
                Exit Sub
            Else
                TB_distBarres.Select()
                Exit Sub
            End If
        End If

Avec se code, mon programme regarde d'abord si la longueur max n'est pas atteinte, ensuite regarde ou se situe le curseur, Enregistre dans Deb tout se qui se situe avant le curseur et dans Fin se qui se situe apres le curseur. Pour finir par intercalé entre Deb et Fin un "0" en replacant le curseur au bon endroit.

J'arrive bien a vérifier se qui se situe avant et apres le curseur mais pas se qui se situe avant et apres la ","

Si tu a d'autre question n'hésite pas

Merci quand même