die gesuchte Funktion soll zwei gleichlange, verschiedene Wörter darauf prüfen, ob sie eine vorgegebene Anzahl von gleichen Buchstaben haben.
Function GleicheBuchstaben(a,b,z) As Boolean
a,b die beiden Worte. z die vorgegebene Anzahl von gleichen Buchstaben.
Beispiel: a="STELLE", b="FLIEGE", z=3. ergibt True
Wenn Buchstaben mehrfach vorkommen, wird es schwierig. Mein Ansatz: Von beiden Worten die gleichen Buchstaben in Etappen streichen, bis es keine mehr gibt. a wird "STL" und b wird "FIG". Die Etappen zählen. Kann mir jemand helfen?
Gruß, Erhard