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