auto-controle

safirnet123
auto-controle

je prie a chaque connaisseur maitrisant le Visual Basic de me venir en aide afin que je puisse faire une petit prgramme. qui controle si le numero entré est juste ou pas.
le chiffre d'auto controle est lié aux onze chiffres du numero par une loi mathematique de telle sorte que les erreurs accidentelles de frappe puissent etre detectées.
Ce chiffre d'auto controle s'elabore de la maniére suivante:
_ les chiffres de Rang pair du nombre primitif (Comptés à partir de la droite) sont pris avec leur valeur décimale propre.
- les chiffres de Rang impair du nombre prémitif ( comptés à partir de la droite) sont multipliés par 2.
- on constitue la somme formée par les chiffres de rang pair et par tous les chiffres constituant les produits partiels provenant des chiffres de rang impair, on retient le chiffre des unités de cette somme.
_ le complement à 10 chiffre des unites constitue le chiffre d'auto-controle; si ce chifre des unités est zéro, le chiffre d'auto-controle est également zéro.


Exemples:
1/ soit le nombre primitif = 2 1 9 2 1 2 0 0 3 8 8
x
poids = 2 1 2 1 2 1 2 1 2 1 2
_______________________
= 4 1 182 2 2 0 0 6 8 16

Somme : 4+1+1+8+2+2+2+0+0+6+8+1+6 = 41
le chiffre des unités de cette somme est 1, par consequent le chiffre d'auto-controle est 9 et le nombre primitif devient le numéro Matricule :
21 92 120 0388-9
2/ soit le nombre primitif = 3 1 9 2 9 3 0 5 1 2 7
x
poids = 2 1 2 1 2 1 2 1 2 1 2
_______________________
= 6 1 182 183 0 5 2 2 14
somme : 6+1+1+8+2+1+8+3+0+5+2+2+1+4 = 44
le chiffre des unités de cette somme est 4, par consequent le chiffre d'auto-controle est 6 et le nombre primitif devient le numéro Matricule :
31 92 930 5127-6
merci d'avance je serai tres reconnaissant. :x :x :x

fredericmazue

Quote:
je prie

C'est déjà ça, mais je préférerais un gros chèque.
Quote:
merci d'avance je serai tres reconnaissant.

Mais quel est le problème au juste ?
Tu as tout l'algorithme. Tu l'as donné dans ton post.
"yaka" coder.

Et il faut impérativement que ça soit fait en VB 6.0 cet exercice d'école ?
Ca pourrait pas au moins être en VB .Net, langage quand même beaucoup plus propre sur lui ?