petite précision sur la Fonction Hex()Résolu

Question

Bonjour,



Dans mon code je r&#233;cup&#232;re un tableau chaine() d&#233;clar&#233; en byte.
Afin de pouvoir en tirer des informations, j'ai besoin de les convertir
en hexad&#233;cimal.  Malheuresement, la fonction Hex() enleve le 0 qui
n'est pas utile. 

Par exemple, lorsque je lui demande de convertir 12 en h&#233;xa j'aimerais qu'il me donne "0C" au lieu de "C".



Pour le moment j'ai du passer par un petit bout de code :



Traitement = Hex(Chaine(i))

            If Len(Traitement) = 1 Then

                Traitement = 0 & Traitement

            End If



mais j'aimerais savoir si il n'y avait pas un moyen plus simple et plus "propre" pour arriver au m&#234;me r&#233;sultat.



Merci d'avance

lesdis · Accepted Answer

Bon en allant fouiller la classe string j'ai trouver cette petite methode bien sympathique String.padleft()



Traitement = Hex(Chaine(i))

Traitement = Traitement.PadLeft(2, "0")



Ainsi, je suis sur que traitement sera sur 2 caract&#232;res et qu'il remplacera les espaces manquant de gauche par des 0.



Merci a tous ceux qui ce sont pench&#233; sur mon probl&#232;me

jannoman · Answer

ben c'est assez propre comme ca non ?
sinon ya traitement = Format(traitement, "00")

A+.
Thomas.

jrivet · Answer

Salut,

> jannoman: Je pensais lui proposer ceci aussi mais je l'ai test&#233; et ca ne marche pas... &#231;a affiche toujours "C"

@+, Julien 
Pensez: Moteur de Recherche, R&#233;ponse Accept&#233;e

lesdis · Answer

Merci Thomas,



Mais la fonction Format() ne m'est pas d'utilit&#233; dans ce cas  car elle ne s'applique qu'&#224; des chiffres.

Mon probl&#232;me est que la fonction Hex() te donne un String.

jannoman · Answer

alors disons que pour un code g&#233;n&#233;ral, tu peux faire :
n est le nombre de chiffres que tu veux
a = hex(tonnombre)
b = la chaine de retour

b = space(n)
for k = 1 to n
mid(b,k,1) = "0"
next k

m = len(a)

for k = 1 to m
mid(b, k + n - m, 1) = mid(a, k, 1)
next k

j'ai pas mon ordi la mais a priori ca devrait marcher

Petite précision sur la Fonction Hex()

5 réponses

Discussions similaires