je te remerci ca va beaucoup m'aider
a+ j'espere et bonne continuations dans tes develloppements
-------------------------------
Réponse au message :
-------------------------------
> Ok
>
> En fait, c'est la même chose. Dans la table de caractères, le 'A' correspond à la valeur 65, le 'B' à 66, etc... Le 'a' correspond à 97, le 'b' à 98, etc... Il te suffit de convertir ta chaine en majuscules ou en minuscules avec UCase ou LCase puis de soustraire la valeur de a - 1 (96 si c'est des minuscules). Par exemple : On reprend ta chaine "Vince" :
>
>
>
'Chaine de départ. Ca peut être une saisie de l'utilisateur...
> ST = "Vince"
>
> 'Conversion en minuscles (pour etre sure...)
> ST = LCase(ST)
>
> 'Balayage de la chaine
> For V = 1 To Len(ST)
> 'On enlève 96 à chaque lettres pour trouver sa position dans l'alphabet
> VL = VL ++ (Asc(Mid(ST, V, 1)) - 96)
> Next V |
>
>
>
> Dans notre cas, VL sera égal à 53 (22+9+14+3+5)
>
> Ensuite tu peux effectivement additioner les digits du resultat :
>
>
>
'=> Conversion du résultat en chaine
> DST = CStr(VL)
>
> '=> Remise à 0 de VL
> VL = 0
>
> '=> Boucle de balayage des digits
> For V = 1 To Len(DST)
> 'Addition des digits
> VL = VL + Val(Mid(DST, V, 1))
> Next V |
>
>
> Et là on obtient DST = 8 (5+3). L'avantage de cette boucle c'est que si VL est égal à 536 ou 1286, tout les digits seront additionés. Tu peux également placer cette boucle dans une autre, temps que VL est > à 9 donc sur deux digits ou plus, puisqu'on ne connait pas la taille de la chaine ST au départ...
>
> B@se
>
>
> -------------------------------
> Réponse au message :
> -------------------------------
>
> >
> > en fait ce que je voudrais c'est que si je mets un nom et un prenom le logiciel me calcul le numero par exemple
> >
> > vince
> >
> > v = 22
> > i = 9
> > n = 14
> > c = 3
> > e = 5
> >
> > pis apres il additione tous pour trouver qu'un numero a 1 chiffre
>