Imports System

Imports System.Text

Public Module Module1

    Public Sub Main()

        ' https://www.dotnetperls.com/stringbuilder-vbnet

        Dim builder As New StringBuilder

        Dim number As Integer = 1

        ' receives a format string, usually with substitutions such as {0}, and parameters to fill those substitutions

        builder.AppendFormat("R: {0} ({1}).", "ABC", number)

        Console.WriteLine(builder)

​

        'Replace

        builder.Replace("1", "ABC")

        Console.WriteLine(builder)

​

        'For-each

        Dim items As String() = New String() {"Indus", "Danube", "Nile"}

        builder = New StringBuilder("These rivers are cool:").AppendLine

​

        For Each item As String In items

            builder.Append(item).AppendLine()

        Next

        Console.WriteLine(builder.ToString)

        'Insert

        builder = New StringBuilder("A cat")

        Console.WriteLine(builder)

        ' Insert this string at index 1.

        builder.Insert(1, " fluffy")

        Console.WriteLine(builder)

        'Remove

        builder = New StringBuilder("A big dog")

        Console.WriteLine(builder)

        ' Remove character starting at index 1. Remove 4 characters.

        builder.Remove(1, 4)

        Console.WriteLine(builder)

    End Sub

End Module