Affichage binaire dans text box

Signaler
Messages postés
2
Date d'inscription
mercredi 6 mai 2009
Statut
Membre
Dernière intervention
13 mai 2009
-
Messages postés
219
Date d'inscription
lundi 21 novembre 2005
Statut
Membre
Dernière intervention
20 décembre 2010
-
Salut à tous!

Je dois créer un petit projet en VB6 et je sèche quelque peu....
Je dois réaliser une interface entre un ordi et l'uart ( liaison série rs 232 ) d'une carte électronique => OK
Cette interface me retourne la valeur d'un registre du processeur via le port série; je dois afficher la valeur de ce port => OK
Cette valeur hexadécimale doit être convertie en binaire  => OK
Le but de cette conversion est de pouvoir afficher la valeur des 32 bits en activant ou non ( en fonction du nombre binaire ) des "picture box". Et c'est la que je cale, je ne
vois pas comment je peux lire la textbox avec mes 32 valeurs binaires et leurs correspondre une picture box à chacune.

Si qqn à une idée......
Merci d'avance!

1 réponse

Messages postés
219
Date d'inscription
lundi 21 novembre 2005
Statut
Membre
Dernière intervention
20 décembre 2010

Salut
 Il faut utiliser l'opérateur logique "AND"

Dim nb As Long , Resultat  As Long
for I = 0 to 31
  nb = 2^I
   Resultat = ValeurRegistre And  nb
  If nb =Resultat Then
      Call Allumage( Picture(I) )
  End If