Imports System
Public Class Program
Public Shared Sub Main()
Dim str As String = "CullenAurthurCoreEcho"
Dim array As Char() = {"A"c, "r"c}
Dim words As String() = str.Split(array)
For Each word As String In words
Console.WriteLine(word)
Next
End Sub
End Class
' run:
'
' Cullen
' u
' thu
' Co
' eEcho
'