mikrocontroller.net

Forum: PC-Programmierung Bitoperation in VB


Autor: Christian (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
Hallo,

ich möchte die einzelnen Bits eines Bytes auslesen und in einer 
Boolvariablen ablegen. Folgende Funktion habe ich gemacht:
Public Function GetBit(ByVal Expression As Byte, ByVal BitNum As Byte) As Boolean
        GetBit = CBool(Expression And 2 ^ BitNum)    
End Function

For i = 0 To 7
            NextBit = GetBit(224, i)
            Label1.Text = Label1.Text & NextBit
Next

In dem Label1 kommen die Werte immer doppelt an: für 224 habe ich als 
Ausgabe
00000111 00000111. Eigentlich müsste doch nur einmal 00000111 
rauskommen, oder?

Vielen Dank für eure Hilfe!

Gruß, Christian

Autor: Christian (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
Oh halt!

Es hat sich schon erledigt! Das ganze war in einer dummen Schleife 
eingebaut!

Es funktioniert jetzt :)

Antwort schreiben

Die Angabe einer E-Mail-Adresse ist freiwillig. Wenn Sie automatisch per E-Mail über Antworten auf Ihren Beitrag informiert werden möchten, melden Sie sich bitte an.

Wichtige Regeln - erst lesen, dann posten!

  • Groß- und Kleinschreibung verwenden
  • Längeren Sourcecode nicht im Text einfügen, sondern als Dateianhang

Formatierung (mehr Informationen...)

  • [c]C-Code[/c]
  • [avrasm]AVR-Assembler-Code[/avrasm]
  • [code]Code in anderen Sprachen, ASCII-Zeichnungen[/code]
  • [math]Formel in LaTeX-Syntax[/math]
  • [[Titel]] - Link zu Artikel
  • Verweis auf anderen Beitrag einfügen: Rechtsklick auf Beitragstitel,
    "Adresse kopieren", und in den Text einfügen




Bild automatisch verkleinern, falls nötig
Bitte das JPG-Format nur für Fotos und Scans verwenden!
Zeichnungen und Screenshots im PNG- oder
GIF-Format hochladen. Siehe Bildformate.
Hinweis: der ursprüngliche Beitrag ist mehr als 6 Monate alt.
Bitte hier nur auf die ursprüngliche Frage antworten,
für neue Fragen einen neuen Beitrag erstellen.

Mit dem Abschicken bestätigst du, die Nutzungsbedingungen anzuerkennen.