「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

結果
TSSS1が正規表現式に一致
KSS2が正規表現式に一致
HsTsが正規表現式に不一致