1.2 StringBuilder の使い方

1.2 StringBuilder の使い方

Sub StringBuilder_Sample()

    Dim SB As IStringBuilder
    
    Set SB = StringBuilder.NewInstance()
    
    SB.Append "A"
    SB.Append "B"
    SB.Append "C"
    SB.Append "D"
    SB.Append "E"

    '文字列の連結
    Debug.Print SB.ToString

    'Join と同じようにも使用可能。
    Dim S2 As StringBuilder
    
    Set S2 = StringBuilder.NewInstance()
    
    'Trueをつけるとダブルコーテーションで囲む
    S2.Append "red", True
    S2.Append "green", True
    S2.Append "blue", True

    '文字列の連結（カンマ区切り）
    Debug.Print "[" & S2.ToJoin(",") & "]"


End Sub

実行結果

ABCDE
["red","green","blue"]