Sujet Précédent Sujet Suivant

Convertir 32bits en 4bits

Résolu
le cancre Messages postés 292 Date d'inscription mercredi 25 octobre 2006 Statut Membre Dernière intervention 27 novembre 2009 - 2 nov. 2006 à 17:04
le cancre Messages postés 292 Date d'inscription mercredi 25 octobre 2006 Statut Membre Dernière intervention 27 novembre 2009 - 3 nov. 2006 à 02:49
Bonjour à tous ^^
je dois remplir un champ(de 4bits) avec une valeur de 5mots de 32bits
au départ j'ai 20 octets = 160bits que je divise par 32 pour obtenir 5

j'ai trouvé une fonction mais elle prend que les valeurs 8bits
Public Function HiNibble(bytValue As Byte) As Byte
    HiNibble = (bytValue And &HF0) \ 16
End Function
'HiNibble extrait les 4 bits supérieurs d'une valeur 8bits et les renvoie comme une valeur 4bits.

2 réponses

Réponse 1 / 2
ShareVB Messages postés 2676 Date d'inscription vendredi 28 juin 2002 Statut Membre Dernière intervention 13 janvier 2016 26
2 nov. 2006 à 21:00
salut,

ca marche aussi en Long :

Public Function HiNibble(bytValue As Long) As Byte
    HiNibble = (bytValue And &HF0000000&) \ &h10000000&
End Function

ShareVB
3
Réponse 2 / 2
le cancre Messages postés 292 Date d'inscription mercredi 25 octobre 2006 Statut Membre Dernière intervention 27 novembre 2009
3 nov. 2006 à 02:49
merci ShareVB
0

Discussions similaires

Conversion d'une image tiff -> jpeg sans perte
cs_dormilon -
dormilon -

4 réponses
convertir STRING en INT
76julien -
chicfrandy -

15 réponses
Convertir nombre de jours en année, mois et jours
mehdiyou -
Whismeril -

10 réponses
ecriture littérale d'un chiffre en lettre arabe
bocheta1966 -
cs_Korda -

7 réponses
conversion string en int (C#)
speedus95 -
vdekeuwer -

5 réponses
Rejoignez-nous