Click here to Skip to main content
12,946,164 members (52,739 online)
Rate this:
Please Sign up or sign in to vote.
See more:
How do I count the number of words in a given text string in language ????????
Posted 7-Dec-12 11:49am
Rate this: bad
Please Sign up or sign in to vote.

Solution 2

You may try:

Function WordCount(text As String)
  Dim pattern As String = "\b(\w+)\b"
  Dim r As Regex = New Regex(pattern)
  Return r.Matches(text).Count
End Function
At least no need to define what a "word" is; a 5.
CPallini 7-Dec-12 18:41pm
Thank you, sir.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

    Print Answers RSS
Top Experts
Last 24hrsThis month
OriginalGriff 4,899
CHill60 3,205
Maciej Los 2,453
Jochen Arndt 1,935
ppolymorphe 1,795

Advertise | Privacy | Mobile
Web02 | 2.8.170518.1 | Last Updated 7 Dec 2012
Copyright © CodeProject, 1999-2017
All Rights Reserved. Terms of Service
Layout: fixed | fluid

CodeProject, 503-250 Ferrand Drive Toronto Ontario, M3C 3G8 Canada +1 416-849-8900 x 100