Selectionner un bit dans un octetRésolu

Question

bonjour
j'ai besoin de selectionner le premier bit dans un octet
voici la partie de mon programme  

numberOfBytesRead = networkStream.Read(myReadBuffer, 0, myReadBuffer.Length)
LstOutputCli.Items.Insert(LstOutputCli.Items.Count, myReadBuffer(0))
BitSync = myReadBuffer(0)

le probleme est que myReadBuffer(0) est un octet et moi je veux juste le premier bit de cet octet 

merci

beepcool · Accepted Answer

voici, deux moceaux de code : l'un pour tester et l'autre pour affecter un bit.

pour tester un bit :
    Dim OctetATester As Byte
    Dim BitATester As Byte

    BitATester = &H80 ' bit de poid le plus fort
    
    OctetATester = &H12
     
    If (OctetATester And BitATester) = BitATester Then
        MsgBox "byte ok"
    Else
        MsgBox "byte ko"
    End If
    
pour affecter un 1 &#224; un bit :
    Dim OctetAAffecter As Byte
    Dim BitAAffecter As Byte

    BitAAffecter = &H80 ' bit de poid le plus fort
    
    OctetAAffecter = &H12
    OctetAAffecter =OctetAAffecter or BitAAffecter 

pour affecter un 0 &#224; un bit :

   Dim OctetAAffecter As Byte
    Dim BitAAffecter As Byte

    BitAAffecter = &H80 ' bit de poid le plus fort
    
    OctetAAffecter = &H12
    OctetAAffecter =OctetAAffecter and not( BitAAffecter )

beepcool

cs_Galain · Answer

Salut Chrisly
Je suppose que le premier bit de ton octet est le bit 7
Dans ce cas pour avoir sa valeur tu peux faire

BitSync = myReadBuffer(0) \ 128

GRENIER Alain[8D]

Chrisly74 · Answer

le premier bit de mon octet est le bit 0

merci

cs_Galain · Answer

Salut Chrisly
Si le premier bit de ton octet est le bit 0
Dans ce cas pour avoir sa valeur tu peux faire

BitSync = myReadBuffer(0) and 1

GRENIER Alain[8D]

Chrisly74 · Answer

Merci bien les gars je vais essayer et je vous tiens au courant

Chrisly74 · Answer

sa marche encore merci pour votre aide

Selectionner un bit dans un octet

6 réponses

Discussions similaires