Ein bestimmtes Bit einer Variable überschreiben

Hallo,

ich will in einem Programm ein bestimmtes Bit einer Integer-Variable (ich brauche nur 12 Bit) auf 0 setzen, die restlichen Bits aber unverändert lassen.
Mir wäre jetzt nur diese Möglichkeit eingefallen, die aber nicht gerade codesparend ist:

Code:

---

  Select Case Bitnummer
  Case 0
      Ausgaenge = Ausgaenge And &B111111111110

  Case 1
      Ausgaenge = Ausgaenge And &B111111111101

  Case 2
      Ausgaenge = Ausgaenge And &B111111111011

  Case 3
      Ausgaenge = Ausgaenge And &B111111110111

  Case 4
      Ausgaenge = Ausgaenge And &B111111101111

  Case 5
      Ausgaenge = Ausgaenge And &B111111011111

  Case 6
      Ausgaenge = Ausgaenge And &B111110111111

  Case 7
      Ausgaenge = Ausgaenge And &B111101111111

  Case 8
      Ausgaenge = Ausgaenge And &B111011111111

  Case 9
      Ausgaenge = Ausgaenge And &B110111111111

  Case 10
      Ausgaenge = Ausgaenge And &B101111111111

  Case 11
      Ausgaenge = Ausgaenge And &B011111111111
  End Select

---

Gibt es vielleicht einen Befehl, der mir ein bestimmtes Bit auf 0 setzt?
Sowas in der Art wäre perfekt:

Befehl Variable , Bitnummer , 0

Gibt es sowas?

MfG, Dane

variable.bit = 0 ^^

Martin

Danke!

Manchmal sind es eben die einfachen Sachen, auf die man nicht kommt :)

Dane

Hi!

Anmerkung, da mans auch ganz gerne übersieht und oder vergisst: Bits zählt man immer von 0-7.

Bitte nicht als persönlichen Angriff oder so werten, aber evtl. liest das mal in nem Jahr jemand und macht genau den Fehler. Deshalb ist es gut, wenn das hier dabeisteht... ;D

VLG Tobi