Split with string arrays
Imports System Class Sample Public Shared Sub Main() Dim phrase As String = "this is a test" Dim words() As String words = phrase.Split(TryCast(Nothing, String()), 3,StringSplitOptions.RemoveEmptyEntries) words = phrase.Split(New String() {}, 3,StringSplitOptions.RemoveEmptyEntries) End Sub End Class