string - 搜索单词而不是字符串？

Question

我想检查一个特定单词的文件，我发现在各种论坛上发布的方式是使用以下代码......

Dim content = My.Computer.FileSystem.ReadAllText(filePath)
If content.Contains("stringToSearch") Then
    'Do your stuff
End If

这没关系，直到您发现它会搜索和匹配复合词等。例如，如果我搜索字符串 light在一个文件中，它不存在，而是单词 lightning是，它仍然会注册为找到匹配项...有没有办法使用 VB.net 查找和准确的单词？

Answer 1

正如 Andrew Morton 所提到的，Regex 使这种事情变得非常容易。例如，如果您创建了这样的函数:

Public Function ContainsWord(input As String, word As String) As Boolean
    Return Regex.IsMatch(input, $"\b{word}\b")
End Function

你可以像这样使用它:

Dim content = My.Computer.FileSystem.ReadAllText(filePath)
If ContainsWord(content, "stringToSearch") Then
    'Do your stuff
End If

如果您愿意，您甚至可以将其设为 extension method在 String类型，将其放入模块并添加 ExtensionAttribute ， 像这样:

<Extension>
Private Function ContainsWord(input As String, word As String) As Boolean
    Return Regex.IsMatch(input, $"\b{word}\b")
End Function

然后你可以这样称呼它:

Dim content = My.Computer.FileSystem.ReadAllText(filePath)
If content.ContainsWord("stringToSearch") Then
    'Do your stuff
End If