Imports System.Text
Public Class Form1
Private Sub btnStringBuilder_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnStringBuilder.Click
Dim ssb As New System.Text.StringBuilder
ssb.Append("M")
ssb.Append(txtStringBuilder.Text.ToString)
ssb.Append("Q")
MsgBox(ssb.Length)
MsgBox("|" & ssb.ToString & "|")
ssb.Remove(0, ssb.Length)
MsgBox("|" & ssb.ToString & "|")
End Sub
End Class