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 : 472
Nombre de snippets : 1507
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 : 3702
Catégorie(s) : Maths, Algorithme, Divers
Langage sélectionné : VB 2005
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 : VB.NET 1.x , VB 2005
Date ajout : 07/01/2008
Posté par PCPT [Liste]
DateMAJ : 07/01/2008 

Function ConvertBase10ToBase2(ByVal Value As Long) As String

Dim lQuotien As Long, lRest As Long

Dim sRet As String = String.Empty 

    ' valeur positive

    Value = Math.Abs(Value)

    ' crée la chaîne

    Do

        lQuotien = Value \ 2

        lRest = Value - (lQuotien * 2)
        sRet = String.Concat(lRest.ToString, sRet) 
        Value = lQuotien
    Loop Until lQuotien = 0 
    Return sRet 
End Function
Remarque :
MessageBox.Show(ConvertBase10ToBase2(666))

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

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

12/04/2006 - N'autoriser que la Saisie de chiffres dans un champ texte

02/04/2006 - Convertir une IP en long et un long en IP ( IP2Long, Long2IP )



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...

{Visual Basic, VB6, VB.NET, VB 2005} ECRIRE OU LIRE UNE STRUCTURE DANS UN FICHIER BINAIRE
J'ai cherché un peu mais à ce qu'il me semble, si on souhaite enregistrer une structure dans un fich...

{C / C++ / C++.NET} RÉSOLUTION NUMERIQUE
Il s'agit d'une source permettant de résoudre numériquement les systèmes de type df(x, y, z, t)/dt =...

{C / C++ / C++.NET} HORLOGE NUMÉRIQUE EN SDL
Salut! Ben voila mon premier code posté :-) L'idée de base était de faire une horloge numérique ave...

{Delphi} DATE EN ARABE
C'est un petit programme qui convertit la date du jour en langue Arabe. La fonction intégrée conver...