einzelne Bits in Byte-Variablen aendern

[feldmueller]

Hallo zusammen,

wahrscheinlich eine einfach Frage, aber ich komm grad auf keine einfach Loesung.

Ich habe 8 Eingangsports, deren Zustand ich abfrage. Jeder Port steht fuer den Zustand eines Bits in meiner Byte-Variablen. Also Zustand von Port 0-7 soll die Bits 0-7 in meiner Variablen sein.
Jetzt weiss ich nicht, wie ich bei einer Byte-Variablen auf einzelne Bits zugreifen kann. Meine Idee war zuerst ein Bit-Array der Laenge 8 als Overlay zu erstellen und damit auf die einzelnen Bits zuzugreifen. Da sagt mir aber der Compiler, dass er keine Bit-Arrays mag...
Ich koennte natuerlich auch in einer Schleife jedesmal mit Shift ein Bit weiterruecken, aber das ist ja auch irgendwie "suboptimal" ...

Waere fuer eine kleine Hilfe sehr dankbar, bin sicher ich ueberseh was ganz einfaches...

Ciao Stefan

[PicNick]

dim bytevar as byte
dim bitnr as byte
for bitnr = 0 to 7
ByteVar.BitNr = 0
next

klaro ?

[feldmueller]

Wunderbar! Hab ich wieder was gelernt heute...

mfg Stefan