How to find total number of word in a text file in vb.net

Question

Hi How to find total number of word in a text file in vb.net

Vulpes · Answer

Here's one way of doing it: Imports System Imports System.IO Imports System.Text.RegularExpressions Module Program Sub Main() Dim filePath As String = someFile.txt Dim text As String = File.ReadAllText(filePath) Dim regExp As String = \b\w+\b Dim words As MatchCollection = Regex.Matches(text regExp) Console.WriteLine(Number of words in '{0}' is {1} filePath words.Count) Console.ReadKey() End Sub End Module