然后将次数导出到Excel表中,有一百段段落~第二段的时候要和第一段的不同单词要加行。都要统计次数~
dim s as string
s = file.readalltext(文件名)
var query = s.split(" ").groupby(function(x) x).select(x => new with{.word = x.key, .count = x.count() })
for each item in query
msgbox item.word & "出现了" & item.count & "次"
dim s as string
s = file.readalltext(文件名)
var query = s.split(" ").groupby(function(x) x).select(function(x) new with{.word = x.key, .count = x.count() })
for each item in query
msgbox item.word & "出现了" & item.count & "次"