TabStop

''' <summary>
''' Adds/insert a TAB stop to this string
''' </summary>
''' <param name="sender"></param>
''' <returns></returns>
''' <remarks></remarks>
<Runtime.CompilerServices.Extension()> _
Function TabStop(ByVal sender As String) As String
    Return sender & System.Text.RegularExpressions.Regex.Unescape("\t")
End Function

Private Sub Demo()
    Dim Sample As String = ""

    For x As Integer = 100 To 200 Step 10
        Sample &= x.ToString.TabStop
    Next
    Console.WriteLine("[{0}]", Sample)
    Sample = ""
    For x As Integer = 200 To 300 Step 10
        Sample &= x.ToString.TabStop
    Next
    Console.WriteLine("[{0}]", Sample)
End Sub