Quote Originally Posted by dday9 View Post
LINQ would work in this case too:
Code:
Private Function GetMostOccuringWord(ByVal input As String) As String
    Dim sentence() As String = input.Split({" "}, StringSplitOptions.RemoveEmptyEntries)

    Return sentence.GroupBy(Function(n) n).OrderByDescending(Function(g) g.Count).Select(Function(g) g.Key).FirstOrDefault
End Function
I was waiting for someone to whip up a Linq version. Very nice. I really need to learn Linq well.