「VB.NET」正規表現式でハイフンと数字を判定する
書式
(-\d{3}){2}
ハイフンの後に3桁の数字を入力し、このパターンの2回の出現を一致させます。
使用例
Imports System.Text.RegularExpressions
Module Module1
Sub Main()
'文字列型配列
Dim ptArr() As String = {"T-121", "A-525-5689", "#!@"}
'ハイフンの後に3桁の数字を入力し、このパターンの2回の出現を一致
Dim pattern As String = "(-\d{3}){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 = {"T-121", "A-525-5689", "#!@"}
'ハイフンの後に3桁の数字を入力し、このパターンの2回の出現を一致
Dim pattern As String = "(-\d{3}){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 = {"T-121", "A-525-5689", "#!@"} 'ハイフンの後に3桁の数字を入力し、このパターンの2回の出現を一致 Dim pattern As String = "(-\d{3}){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
結果
T-121が正規表現式に不一致
A-525-5689が正規表現式に一致
#!@が正規表現式に不一致