---

Dim einWahrheitswert As Boolean

einWahrheitswert = True
einWahrheitswert = False

---