---

Dim einKurzerText As String
Dim einZweiterText As String
Dim einDritterText As String


    einKurzerText = "James Bond"
    einZweiterText = "3246"
    einDritterText = "_Ha%%o  H[]rr  M$ll^r_, SiE hAbEn pOsT"

---