Convertisseur multi-bases

4/5 (2 avis)

Vue 2 542 fois - Téléchargée 238 fois

Description

Convertis un entier donné en base 10 dans une autre base. (Toute les calculettes le font mais c'est pour utiliser VB et la division euclidienne).

Codes Sources

A voir également

Ajouter un commentaire Commentaires
Messages postés
1
Date d'inscription
lundi 1 décembre 2003
Statut
Membre
Dernière intervention
27 décembre 2003

merci pour les remarques, je vais remanier tout ça
Messages postés
291
Date d'inscription
vendredi 21 février 2003
Statut
Membre
Dernière intervention
13 mars 2015

Un truc du genre
Private Const gsUnites = "0123456789ABCDEF"
sDigit = Mid$(gsUnites, Quotient + 1, 1)
aurait ete beaucoup mieux que des "selec tcase" répétitifs à n'en plus finir.
De plus il ya a des erreur de calcul, plutot de raisonnement.
si on fait les opérations suivantes
Base: 16 Valeur: 8 click sur "Convertion" résultat: 8
Base: 16 Valeur: 512 click sur "Convertion" résultat: 200
Base: 16 Valeur: 8 click sur "Convertion" résultat: 8200
Y a comme un problème ? du en grande partie par un code insufisamment encapsulé, du coup il doit y avoir des tableaux ou des variables qui ne sont pas réinitialisé correctement.
De plus pas de retour inverse, pas de convertion vers la base d'origine, domage. !

Pour info j'ai deposé une source que j'ai ressorti d'un fond de trroir qui à un objectif sensiblement similaire.

http://www.vbfrance.com/code.aspx?ID=18999

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.