German String nach jedem Zeichen ein Leerzeichen

[so27]

Hallo zusammen,

in einer App von mir werden verschiedene Zeichen in einem String ausgegeben. Diese Zeichen werden alle aneinander, ohne Leerzeichen geschrieben.

Nun benötige ich aber für eine weitere Funktion Leerzeichen nach jedem Zeichen in diesem String.

Beispiel:

String: jhfdjufah88 (so wird er ausgegeben)

Ich benötige ihn aber wie folgt:
j h f d j u f a h 8 8

Ach ja, jeder String ist unterschiedlich lang.

Weiß jemand auf die Schnelle wie das mit B4A geht?

 

[klaus]

Das kann man so machen:

Private strOld = "jhfdjufah88" As String
Private strNew As String

Private i As Int
For i = 0 To strOld.Length - 1
    strNew = strNew & strOld.CharAt(i)
    If i < strOld.Length - 1 Then
        strNew = strNew & " "
    End If
Next

 

[so27]

VIELEN DANK , Klaus

 

[Deleted member 103]

Es geht auch eleganter.

Sub Globals
    'These global variables will be redeclared each time the activity is created.
    'These variables can only be accessed from this module.

    Private strOld = "jhfdjufah88" As String
    Private sb As StringBuilder
End Sub

Sub Activity_Create(FirstTime As Boolean)
    'Do not forget to load the layout file created with the visual designer. For example:
    'Activity.LoadLayout("Layout1")

    Log(NewString(strOld))
End Sub

Sub NewString(OldStr As String) As String
    sb.Initialize
   
    For i = 0 To OldStr.Length - 1
        sb.Append(OldStr.CharAt(i))
        If i < OldStr.Length - 1 Then sb.Append(" ")
    Next

    Return sb.ToString
End Sub

 

[KMatle]

Es geht auch eleganter.

Library?

 

[Deleted member 103]

Library?

Ja,
denn zum verketten von Strings ist die Library "StringBuilder" die beste Auswahl weil auch viel schneller ist.

So ist eleganter und schneller.