IsPhoneFax

<Extension()> _
Public Function IsPhoneFax(ByVal value As String) As Boolean
    Dim reg As Regex = New Regex("^[2-9]\d{2}-\d{3}-\d{4}$")
    Return reg.IsMatch(value)
End Function

Textbox1.Text.IsPhoneFax

Description

Check string that contains valid Phone / Fax

Details

• Author: NetDorkie
• Submitted on: 7/16/2009 3:27:45 PM
• Language: VB
• Type: System.String
• Views: 2113

Double click on the code to select all.