Imports System
Imports System.Text
Class Sample
Public Shared Sub Main()
Dim sb As StringBuilder
sb = new StringBuilder
sb.Append("1234")
Dim xBool As Boolean = True
sb.Insert(3, xBool, 2)
Console.WriteLine(sb.ToString())
End Sub
End Class