Dim blnMatch As Boolean, strValue As String = "https://devabanoub.blogspot.com"
blnMatch = System.Text.RegularExpressions.Regex.IsMatch( _
strValue, "^[a-zA-Z0-9]+([a-zA-Z0-9\-\.]+)?\.(com|org|net|mil|edu|info)$", _
System.Text.RegularExpressions.RegexOptions.IgnoreCase)
MsgBox(blnMatch)
blnMatch = System.Text.RegularExpressions.Regex.IsMatch( _
strValue, "^[a-zA-Z0-9]+([a-zA-Z0-9\-\.]+)?\.(com|org|net|mil|edu|info)$", _
System.Text.RegularExpressions.RegexOptions.IgnoreCase)
MsgBox(blnMatch)
تعليقات
إرسال تعليق