txtファイル内の特定のテキストの出現をカウントする

Question

VB.netを使用してtxtファイル内の特定のテキストオカレンスのインスタンスをどのように集計できるかは誰にでも分かります。テキストボックスを使用してテキストを入力すると、VB.netを使用してそのテキスト部分のtxtファイルを検索し、別のテキストボックスまたはラベルに数えられた量を返すことができます。

Answer 1

また、これを実現するためにLINQを使用することができます。

Dim separator = {" "c} 
Dim words = (From line As String In IO.File.ReadLines("C:\Temp\SampleFile.txt") 
      From word In line.Split(separator, StringSplitOptions.RemoveEmptyEntries) 
      Where word = TxtWordToFind.Text).Count 

同じメソッドの構文（VBでcrabbed）に：

words = IO.File.ReadLines("C:\Temp\SampleFile.txt"). 
     SelectMany(Function(line) line.Split(separator, StringSplitOptions.RemoveEmptyEntries)). 
     Where(Function(word) word = TxtWordToFind.Text).Count