2014-03-30 156 views
0

快速的問題,無論如何,我可以修改此聲明以包含所有特殊字符,即! & ^%$£等如果包含特殊字符?

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 

如果沒有一種方法,我可以只寫出來的個體,但我如果可能的話,更喜歡讓他們在幾行內,謝謝你的幫助

回答

1

看看Regular Expressions。你可以 - 小心,因爲「特殊字符」也經常做的事情在正則表達式,你需要逃跑,我可能無法趕上他們全部 - 有這樣的事

Imports System.Text.RegularExpressions 

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

(管子在這種情況下,表現出交替的東西相匹配。既然你正在尋找的任何字符,這也很容易除了對於上述警告。)

然後檢查m.Success值。

+0

非常感謝很多幫助 – user2058186