Anyone have any idea on how to COUNT how many "words" (Not character count) are in a selection? I want to be about to have a paragraph in a text field and highlight part of it and get an automatic count displayed in a label but just highlighting it. I don't want to have any buttons to push for this action..

This is what I have right now that counts the full amount of words in a text box (Have to push button to have that displayed)
I want to keep this in because I still want a button to calculate how many words are total in a text box.

Code:
        Dim strInput As String
        strInput = RichTextBox1.Text
        Dim strSplit() As String
        strSplit = strInput.Split(CChar(" "))
        Label7.Text = strSplit.Length