CONVERTISSEUR DECIMAL - BINAIRE (ALGORITHME DE CONVERTION DÉTAILLÉ) AVEC CHOIX D
SamirAloui
Messages postés
53
Date d'inscription
mardi 3 janvier 2006
Statut
Membre
Dernière intervention
20 mars 2008
-
4 août 2006 à 17:34
SamirAloui Messages postés 53 Date d'inscription mardi 3 janvier 2006 Statut Membre Dernière intervention 20 mars 2008 - 4 août 2006 à 17:36
SamirAloui Messages postés 53 Date d'inscription mardi 3 janvier 2006 Statut Membre Dernière intervention 20 mars 2008 - 4 août 2006 à 17:36
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
https://codes-sources.commentcamarche.net/source/790-convertisseur-decimal-binaire-algorithme-de-convertion-detaille-avec-choix-du-format-de-mot-en-sortie
https://codes-sources.commentcamarche.net/source/790-convertisseur-decimal-binaire-algorithme-de-convertion-detaille-avec-choix-du-format-de-mot-en-sortie
4 août 2006 à 17:36
---------------
return (conv)
---------------
dans la fin du fonction ToBinary. deso deso desolé
4 août 2006 à 17:34
1- Il faut suivie les principe de programmation en Gene logiciel (L'independence de l'interface et le noyeau fonctionnel), alors tu peut ecrire un simple fonction de conversion avec des parametres de type ( integer, single, double,byte...etc) [tu peut redifiner la fonction] ensuite tu faire appele a cette fonction. chaqu'un l'utilise selon ses besoin et elle reste compatible avec toutes les objets de l'interface (TextBox, ou listes ou simple variable)
et le code sera
---------------------------------------------------------
public fonction ToBinary(byval nbr as Integer)as String
dim conv as string=""
Do
conv=(nbr Mod 2) & conv
nbr=nbr \ 2
Loop While nbr>0
end function
-------------------------------------------------------------
puis faire les teste si toute est correcte Alors
--------------------------------------------------------------
lblResultat.Text = ToBinary(Ctype(txtEntree.Text,Integer))
--------------------------------------------------------------
2- Il faut savoire que la boucle "DO....LOOP" est plus plus rapide que la boucle "FOR.....NEXT", pour ça essayer toujour d'éviter la boucle "FOR" on la traduit en boucle "DO WHILE"
Mais il reste toujour une bonne essaye. Continue