Validating a Phone Number
Simple example of validating a phone number:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
' Invalid phone number
'Dim strPhone As String = "123456789"
' valid phone number
Dim strPhone As String = "(123) 456-7890"
Dim regexp As New Regex(("^\(?\d{3}\)?\s|-\d{3}-\d{4}$"))
If regexp.IsMatch(strPhone) Then
MsgBox("Valid Phone Number")
Else
MsgBox("Invalid Phone Number")
End If
End Sub