Länge von Namen
11.02.2003 09:18:54
Gregor
Wie eruire ich aus Name und Vorname am besten den Vorname (am Beispiel Abächerli Florentin den Vornamen "Florentin". Auf Umwegen bin ich auf folgende Lösung gestossen.
Bestimmt gibt es eine bessere. Vielen Dank
Dim txt1, txt2, txt3, Passwort
txt1 = InStr(1, "Abächerli Florentin, " ")
txt2 = Len(Trim("Abächerli Florentin))
txt3 = sLen - txt1
Passwort = Right("Abächerli Florentin", txt1)
Gregor
Anzeige