Les Snippets

Nouveaux snippets
Snippets les plus consultés
Proposer un snippet

 Abonnez vous à ce fil d'information Les rss

Rechercher :

Par langages :

Par Catégorie

Compteurs


Nombre de sujets : 528
Nombre de snippets : 1638
Connexion

Convertir un nombre en chaîne de représentation binaire (base10 vers base2)

Niveau requis pour utiliser/comprendre cette source : 1 ( Débutant )
Créé le 07/01/2008 00:40:49 et initié par PCPT [Liste]
Date de mise à jour : 07/01/2008 19:12:55
Vue : 5711
Catégorie(s) : Maths, Algorithme, Divers
Langages dispo pour ce code :
- VB6, VBA
- Javascript
- VB 2005, VB.NET 1.x
- Delphi 5
- Voir tous les langages pour ce code snippet
Proposer ce code dans un autre langage



Langage : VB6 , VBA
Date ajout : 07/01/2008
Posté par PCPT [Liste]
Function ConvertBase10ToBase2(ByVal Value As Long) As String
    Dim lQuotien As Long, lRest As Long
    
'   valeur  positive
    ConvertBase10ToBase2 = vbNullString
    Value = Abs(Value)
'   crée la  chaîne
     Do
        lQuotien = Value \ 2
        lRest = Value - (lQuotien * 2)
        ConvertBase10ToBase2 = CStr(lRest) & ConvertBase10ToBase2
        Value = lQuotien
     Loop Until lQuotien = 0
End Function
Remarque :
MsgBox Format$(ConvertBase10ToBase2(66666), "0000000000000000")
MsgBox Format$(ConvertBase10ToBase2(666), "00000000")

Snippets en rapport avec : Convertir, Numérique, Binaire, Base10, Base2

05/07/2008 - Binaire vers Hexa (BinToHex) et Hexa vers Binaire (HexToBin)

22/06/2008 - Convertir une chaine en un tableau de chaine (en tenant compte des retours chariot)

15/03/2008 - huffman : arbre et chaine de binaire

05/11/2007 - Convertir un tableau de bytes en image

25/09/2007 - Transformer un tableau de boolean en un tableau de byte

23/08/2007 - Format html (url) vers format chaîne ascii

04/03/2007 - Convertion toutes données vers chaine representation binaire

02/12/2006 - Convertir la taille d'un objet StdPicture

16/11/2006 - Convertit en jours / heures / minutes le temps entre 2 dates & heures

22/04/2006 - Conversion Hexadécimal -> Décimal



Codes sources en rapport avec : Convertir, Numérique, Binaire, Base10, Base2

{Visual Basic, VB6, VB.NET, VB 2005} CONVERTISSEUR BINAIRE
Bonjour. J'ai lutter pour pouvoir convertir un buffer(Byte) en Bits avec la fontion BitConverter...

{C / C++ / C++.NET} OBTENIR L'ETAT DES BITS QUI COMPOSENT UN OCTET (CONVERSION XX->BINAIRE)
J'ai regardé très rapidement si la source n'existait pas et je ne l'ai pas trouvé. Je précise que c...

{ASP / ASP.NET} ASP.NET - FONCTION DE PASSAGE D'UN FICHIER BINAIRE VERS UN TABLEAU DE BYTE
Dans le cas d'utilisation de Classe d'objet complexe, certains paramêtres peuvent être des fichiers ...

{Visual Basic, VB6, VB.NET, VB 2005} CONVERTISSEURS ASCII-HEXA-BINAIRE-TEXTE + CRYPTAGE, UTILE POUR DÉBUTANT
Etant débutant sur tout ce qui concerne le codage j'ai cherché en vain une source qui résumait un pe...

{C / C++ / C++.NET} CONVERSION DES CHIFFRES EN LETTRES
C'est un petit programme pour convertir des chiffres(int ) en lettres....

{Visual Basic, VB6, VB.NET, VB 2005} CONVERTISSEUR BINAIRE/DÉCIMALE ET DÉCIMALE/BINAIRE
Petit programme à emmener partout surtout lorsqu'il y a lieu de faire une mise au point pour décoder...

{PHP} CAPTCHA ANTI-BOT + FICHIER SON (WAV)
Un captcha image assez robuste avec un générateur de fichier wav La source jointe est la fonction...

{Python} CONVERSION ET COMPARAISON D'ENTIER RELATIFS EN BINAIRE
Slt! J'ai écri une fonction qui permet de convertir à la fois deux entiers relatifs en binaire sur k...

{Visual Basic, VB6, VB.NET, VB 2005} CONVERTIR VOS VIDÉOS POUR TOMTOM
Ayant récemment acquis un GPS Tomtom, j'ai installé un lecteur vidéo. J'ai trouvé sur www.tomtomh...

{C / C++ / C++.NET} SOLO OLELOADPICTURE
source pour loader des images jpg,wmf,bmp,ico etc avec OleLoadPicture et render load comme res...