如果包含特殊字符？

Question

快速的问题，无论如何，我可以修改此声明以包含所有特殊字符，即！ & ^％$£等

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。你可以 - 小心，因为“特殊字符”也经常做的事情在正则表达式，你需要逃跑，我可能无法赶上他们全部 - 有这样的事

Imports System.Text.RegularExpressions 

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

（管子在这种情况下，表现出交替的东西相匹配。既然你正在寻找的任何字符，这也很容易除了对于上述警告。）

然后检查m.Success值。