German String Zeichen mal X in anderen Sting vervielfältigen

[so27]

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:

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]

Alles gut, habe die Lösung.

    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...