Permalink
Cannot retrieve contributors at this time
Fetching contributors…
| ' Visual Basic .NET Document | |
| Option Strict On | |
| ' <Snippet5> | |
| Imports System.Text.RegularExpressions | |
| Module Example | |
| Public Sub Main() | |
| Dim inputs() As String = { "jack.sprat", "dog#", "dog#1", "me.myself", | |
| "me.myself!" } | |
| Dim pattern As String = "^[A-Z0-9]([-!#$%&'.*+/=?^`{}|~\w])*(?<=[A-Z0-9])$" | |
| For Each input As String In inputs | |
| If Regex.IsMatch(input, pattern, RegexOptions.IgnoreCase) Then | |
| Console.WriteLine("{0}: Valid", input) | |
| Else | |
| Console.WriteLine("{0}: Invalid", input) | |
| End If | |
| Next | |
| End Sub | |
| End Module | |
| ' The example displays the following output: | |
| ' jack.sprat: Valid | |
| ' dog#: Invalid | |
| ' dog#1: Valid | |
| ' me.myself: Valid | |
| ' me.myself!: Invalid | |
| ' </Snippet5> |