IF包含特殊字符？

Question

快速提问，无论如何，我可以修改此声明以包含所有特殊字符，即！？＆amp; ^％$£等

If tb.Text.Contains("!") Then
        Score += 25
    End If

我试过

If tb.Text.Contains("!"|"?"|"*") Then
        Score += 25
    End If

和

If tb.Text.Contains("!","?","*") Then
        Score += 25
    End If

如果没有办法，我可以单独写出来，但如果可能的话，我宁愿让它们在几行内，感谢您的帮助

Answer 1

看看Regular Expressions。你可以 - 仔细地，因为＆＃34;特殊字符＆＃34;也经常在正则表达式中做一些事情，你需要逃避它，我可能没有抓住它们 - 有类似

的东西

Imports System.Text.RegularExpressions

Dim m As Match = Regex.Match(tb.Text,"(!|\?|&|^|%|\$|£)")

（在这种情况下，管道显示要匹配的其他内容。由于您正在寻找任何字符，因此上述警告的除之外相当容易。 ）

然后检查m.Success。

的值