Split String with Separator

Dear All,
   Today , We will see, How to Split String with Separator

 Public Function SplitString(ByVal str As String, ByVal strSeparator As String) As String()
        Dim strRight As String = String.Empty
        Dim strEmpty As String = strSeparator.Trim
        Dim strSplit() As String = Convert.ToString(str).Split(strEmpty)
        Return strSplit
    End Function