---

Dim einfacheZahl As Single
Dim genaueDezimalZahl As Double
einfacheDezimalZahl = 3.123
genaueDezimalZahl = 24.324328746328

---