Streng der er kommasepereret

Dim delimStr As String = " ,.:"
      Dim delimiter As Char() = delimStr.ToCharArray()
      Dim words As String = "one two,three:four."
      Dim split As String() = Nothing
     
      Console.WriteLine("The delimiters are -{0}-", delimStr)
      Dim x As Integer
      For x = 1 To 5
        split = words.Split(delimiter, x)
        Console.WriteLine(ControlChars.Cr + "count = {0,2} ..............", x)
        Dim s As String
        For Each s In  split
            Console.WriteLine("-{0}-", s)
        Next s
      Next x

Tak det virker