German String Zeichen mal X in anderen Sting vervielfältigen

so27

Active Member
Licensed User
Hallo Zusammen,

ich habe in meiner App einen Spinner von 1 bis 100. Ein ausgewähltes Zeichen sollte nun so oft in einen String kopiert werden. Ich habe mir einfach gedacht, es würde wie folgt funktionieren, was es aber nicht tut:

B4X:
Dim Chart As String = "♥"
MeinString=Chart*Spinner1.SelectedItem

Nach dem oben angezeigten Code sollte also (im Spinner sind z. B. 20 Zeichen ausgewählt) der String MeinString wie folgt bei der Ausgabe aussehen: ♥♥♥♥♥♥♥♥♥♥♥♥♥♥♥♥♥♥♥♥ (also 20 Herzen).

Ich sehe den Wald gerade vor lauter Bäumen nicht mehr. Kann mir mal "eben" bitte jemand behilflich sein? Danke im Voraus.
 

so27

Active Member
Licensed User
Alles gut, habe die Lösung.

B4X:
    Dim Chart As StringBuilder
    Chart.Initialize
    For i = 1 To spZeichen.SelectedItem
        Chart.Append("♥")
    Next
    MeinString=Chart.ToString

Es kann doch auch so einfach sein, wenn man sich mal eben fünf Minuten vom Rechner entfernt...
 
Top