Esimerkkejä Sring luokan käytöstä.

        Dim a, b As String ' myös b strig koska ei ole varianttia kuten VB6:ssa
        Dim i As Integer
        Dim totuus As Boolean
        '
        a = "Ohjelmointiputka"
        '
        ' tekstin pituuden selvitys
        i = a.Length 'i=16
        '
        ' merkin luku keskeltä
        b = a.Chars(5) ' b="m" koska alkaa nollasta
        '
        'Täyttö etumerkeillä haluttuun pituuteen
        b = a.PadLeft(21, "F") 'b=FFFFFOhjelmointiputka
        'Täyttö perään haluttuun pituuteen
        b = a.PadRight(21, "F") 'b=OhjelmointiputkaFFFFF
        '
        'pieniksi
        b = a.ToLower 'b=ohjelmointiputka
        'isoiksi
        b = a.ToUpper ' b=OHJELMOINTIPUTKA
        '
        'turhien merkkien poisto edestä (tyhjä ja tab)
        b = "       " & a 'yksi merkki näistä on tab
        b = b.TrimStart(" ", Chr(9)) ' b=Ohjelmointiputka
        'turhien merkkien poisto takaa
        b = a & "       "
        b = b.TrimEnd(" ", Chr(9)) ' b=Ohjelmointiputka
        'turhien merkkien poisto alusta ja lopusta
        b = "       " & a & "       "
        b = b.Trim(" ", Chr(9)) ' b=Ohjelmointiputka
        '
        'etsintä tekstistä
        i = a.IndexOf("mointi") ' 5 koska alkaa nollasta
        i = a.LastIndexOf("i"c) ' 10 , etsi char
        i = a.LastIndexOf("i") ' 10 , etsi string
        '
        'Alkaako etsityllä tekstillä
        totuus = a.StartsWith("Ohj") ' true
        totuus = a.StartsWith("OHJ") ' false
        'loppuuko haluttuun
        totuus = a.EndsWith("ka") ' true
        '
        'korvaaminen, toimii vain char eikä stringeillä, case sensitive
        b = a.Replace("j"c, "J"c) 'OhJelmointiputka
        '
        'tekstin osan poiminta
        b = a.Substring(4) 'lmointiputka
        b = a.Substring(4, 3) 'lmo
        '
        'lisäys tekstin keskelle
        b = a.Insert(11, "WWW") 'OhjelmointiWWWputka
        'poisto
        b = b.Remove(11, 3) 'Ohjelmointiputka
        '
        'vertailu
        b = a
        If String.Compare(a, b) = 0 Then totuus = True Else totuus = False
        '
        'enumerointi toimii myös
        Dim c As Object = a.GetEnumerator
        For Each c In a
            Debug.Write(c & " ") 'O h j e l m o i n t i p u t k a 
        Next
        '
        ' helpompi enumerointi
        Dim c2 As Char
        For Each c2 In a
            Debug.Write(c2 & " ") 'O h j e l m o i n t i p u t k a 
        Next
        '
        'splittaus osiin
        a = "ohjelmointi,putka"
        Dim d() As String
        d = a.Split(",") 'd(0)="ohjelmointi", d(1)="putka"
        'yhdistely takaisin
        b = String.Concat(d) 'ohjelmointiputka
        '
        'kopiointi taulukkoon
        a = "ohjelmointiputka"
        Dim chararr() As Char
        chararr = a.ToCharArray()
        'palautus taulukosta
        b = "" 'vain varmistus
        b = String.Concat(chararr) 'ohjelmointiputka
        '
        'datan kopiointi toiseen muutuujaan (b = a)
        b = String.Copy(a)
        '
        'toistuva kirjain
        b = New String("*"c, 33)
        '
        'tyhjä
        b = String.Empty  ' b=""
        '
        'Yhdistä välimerkillä
        Dim v() As String = {"123", "456"}
        b = String.Join("*", v) ' "123*456"