[VB] Ca existe une fonction qui transforme un hexa en binaire ?

Marsh Posté le 11-06-2002 à 01:31:10

De le meme facon qu'il existe Hex(blabla) pour transformer un decimal en binaire, ca existe quelque chose pour transformer un Hexa (2 "chiffres" ) en binaire ?

Message édité par getget le 06-11-2002 à 01:43:11

---------------
Gamertag : Getget94 - PSN : Getget1980 - Nintendo Network : Getget1980 - Uplau : Getget1980

Marsh Posté le 11-06-2002 à 01:31:10

Marsh Posté le 11-06-2002 à 09:19:14

j'en sais rien, mais ça doit pas etre tres compliqué à foire soi-même...

---------------
L'invariance de l'univers lorsqu'on change de referentiel...

Marsh Posté le 11-06-2002 à 09:58:06

Il existe des tas d'éditeurs qui font ca (ex : UltraEdit)

T'en as besoin d'un script pour tes progs ou d'un utilitaires tout fait ?*

Marsh Posté le 11-06-2002 à 20:28:16

G touve, je poste ici ca peut servir

Code :

Public Function dec2bin(mynum As Variant) As String
Dim loopcounter As Integer
Do
If (mynum And 2 ^ loopcounter) = 2 ^ loopcounter Then
dec2bin = "1" & dec2bin
Else
dec2bin = "0" & dec2bin
End If
loopcounter = loopcounter + 1
Loop Until 2 ^ loopcounter > mynum
End Function

---------------
Gamertag : Getget94 - PSN : Getget1980 - Nintendo Network : Getget1980 - Uplau : Getget1980

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed

Name *

Email *

URL

Message *