「VB.NET」正規表現式で連続文字を判定する
書式
1.正規表現式 :文字列{回数}
2.Public Function IIf (Expression As Boolean, TruePart As Object, FalsePart As Object) As Object
式の評価に応じて、2 つのオブジェクトのうち 1 つを返します。
使用例
Imports System.Text.RegularExpressions
Module Module1
Sub Main()
'文字列型配列
Dim ptArr() As String = {"TSSS1", "KSS2", "HsTs"}
'連続文字「S」を指定
Dim pattern As String = "S{2}"
'ループで文字を判定
For Each pn As String In ptArr
Console.WriteLine("{0}が正規表現式に{1} ", pn, IIf(Regex.IsMatch(pn, pattern), "一致", "不一致"))
Next
Console.ReadKey()
End Sub
End Module
Imports System.Text.RegularExpressions
Module Module1
Sub Main()
'文字列型配列
Dim ptArr() As String = {"TSSS1", "KSS2", "HsTs"}
'連続文字「S」を指定
Dim pattern As String = "S{2}"
'ループで文字を判定
For Each pn As String In ptArr
Console.WriteLine("{0}が正規表現式に{1} ", pn, IIf(Regex.IsMatch(pn, pattern), "一致", "不一致"))
Next
Console.ReadKey()
End Sub
End Module
Imports System.Text.RegularExpressions Module Module1 Sub Main() '文字列型配列 Dim ptArr() As String = {"TSSS1", "KSS2", "HsTs"} '連続文字「S」を指定 Dim pattern As String = "S{2}" 'ループで文字を判定 For Each pn As String In ptArr Console.WriteLine("{0}が正規表現式に{1} ", pn, IIf(Regex.IsMatch(pn, pattern), "一致", "不一致")) Next Console.ReadKey() End Sub End Module
結果
TSSS1が正規表現式に一致
KSS2が正規表現式に一致
HsTsが正規表現式に不一致