Conversions dec / hexa / bin

Soyez le premier à donner votre avis sur cette source.

Vue 9 193 fois - Téléchargée 774 fois

Description

Ce programme sert à faire des conversions décimales héxadécimales et binaires.

Conclusion :


Etant débutant en programmation j'aimerai avoir l'avis de personnes plus expertes que moi dans ce domaine.Exemple les améliorations à apporter dans le code source.Les erreurs à éviter.Etc...

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

sibi12
Messages postés
337
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
15 avril 2006
-
Oui juste c'est pour un type long. J'ai pas fait attention a ce que j'ecrivais ^^. Autant pour moi.

En même temps je programme de moins en moins en VB...

;-) Bonne prog
celiphane
Messages postés
466
Date d'inscription
samedi 16 février 2002
Statut
Membre
Dernière intervention
20 avril 2007
-
Pour info, la valeur annoncée de 2147483647 serait plutôt le maxi d'un LONG, à mon humble avis :)

Borne positive d'un long : ((256^4)/2 - 1) = 2147483647

@+
Celiphane
celiphane
Messages postés
466
Date d'inscription
samedi 16 février 2002
Statut
Membre
Dernière intervention
20 avril 2007
-
Salut,
je passe par là, juste un mot sur une phrase du commentaire précédent :

<<dans l'aide tu vera que le nombre maxi pour les integer est 0x7FFFFFFF = 2147483647>>

Ha bon ? lol c'est nouveau ;')
>>> Type : Integer
>>> Poids : 2 octets
>>> Interval : -32768 à 32767

C'est de mes connaissances, mais l'aide de VB ne me contrediras pas non plus ;o)
(ou alors j'arrête le VB de suite, parcequ'apparement j'aurai jamais rien compris)

@+
Celiphane
sibi12
Messages postés
337
Date d'inscription
jeudi 19 décembre 2002
Statut
Membre
Dernière intervention
15 avril 2006
-
J'ai jeté un petit coup d'oeil...Je vais essayer d'etre constructif...

- c'est pas très logique la procédure du mousemove. Je l'aurais mis dans le change des textbox. Tu peux créer une procédure pour pas recopier plusieur fois le code.

- sinon pour la conversion Hex=>Dec le plus simple serait sans doute Val("&H" & text2.text).

- dans la conversion Hexa=> Bin un select case serait plus approprié.je te propse même mieux : Met dans un tableau tes representations binaire et tu remplace tout les if par
Form1.Text3 = Form1.Text3 & TableauBinaire(Val("&H" & Mid(Form1.Text2, H, 1)))

- dans l'aide tu vera que le nombre maxi pour les integer est 0x7FFFFFFF = 2147483647.

- Ca pourrait etre utile de pouvoir modifier une valeur au lieu de devoir tout effacer. L'ergonomie en général souffre de quelque faiblesse. Une conversion automatique, c a d pendant la frappe, serait bien ainsi qu'un accès au different text a l'aide du clavier. par exemple ctrl-h pour hexa, ctrl-d pour decimal, ctrl-b pour binaire. Pour cela il suffit de mettre un devant la lettre correspondante du textbox et d'ajuster les tabindex. Donc Label1.caption = "&DECIMAL", tabindex=0 et textbox1.tabindex=1,...

- Ctrl-V dans les textbox ne fonctionne pas. C'est pourtant très utile. Oui je sais Maj-insert fonctionne... mais la on peut coller du texte !!!!

- Niveau de la fenetre j'aurait mis le borderstyle en fixedsingle. A partir du moment ou les boutons ne sont plus la tu pourra aussi la retrecir pour ne pas avoir le 9/10 des textbox de blanc.

Je pense que c'est tout.. c'est déjà pas mal pour un petit coup d'oeil ^^

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.