Affichage binaire dans text box

Question

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!

cnt · Answer

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

Affichage binaire dans text box

1 réponse

Votre réponse

Discussions similaires