Danke schön, also so wie ich das jetzt rauslese, kann ich damit Bits setzen und rücksetzen?! Ich möchte sie aber gerne auslesen. Geht das damit auch?

Dim value

'Lese Bit 2
value = valueAnd BIT1

Das heißt, er macht in dem moment den vergleich mit dem Wert mit dem Zustand des Bits?

Also meinetwegen Variable1 hat den Wert 0000 0010 und BIT1=2. Variable 1 und BIT1, dann logisch 1?