Hinzufügen eines Char in einen String

[Raggi]

Ich habe mir nun alle String-Funktionen angeschaut, aber nicht herausgefunden, wie man einen Character (zB *) an den Anfang oder Ende eines Strings hinzufügt.

Habt Ihr da Ideen?

 

[LoMo]

am anfang könntest du es z.b. so machen:

dim x as string
dim y as string

x = "EST"
y = "T"

x = y & x

x hat dann die zeichen "TEST"

am ende könntest du es z.b. so machen:

dim x as string
dim y as string

x = "EST"
y = "T"

x = x & y

x hat dann die zeichen "ESTT"

 

[Retlaw]

Einfügen geht durch verketten von Strings, soll es in der Mitte sein musst den Originalstring vorher teilen:

Dim text as String
Dim dazu as String
text = "Das ist ein Text."
dazu = "das kommt dazu"

'davor:
text = dazu & text
'danach:
text = text & dazu
'dazwischen:
position = 3
text = left(text,position) & dazu & right(text,len(text)-position)

Solltest du Werte anhängen wollen die nicht als String vorliegen kannst du sie mit Str(Wert) konvertieren.

 

[Raggi]

prima
genau, was ich wollte und viel einfacher als ich dachte!