Imports System
Imports System.Text.RegularExpressions
Public Class Test
Public Shared Sub Main()
Dim pattern As String = "^(?=.*[A-Za-z0-9])[A-Za-z0-9\\/@.,# _-]*$"
Dim s As String = "10/12/2015"
Console.WriteLine(Regex.IsMatch(s, pattern))
End Sub
End Class
SW1wb3J0cyBTeXN0ZW0KSW1wb3J0cyBTeXN0ZW0uVGV4dC5SZWd1bGFyRXhwcmVzc2lvbnMKClB1YmxpYyBDbGFzcyBUZXN0CglQdWJsaWMgU2hhcmVkIFN1YiBNYWluKCkgCgkJRGltIHBhdHRlcm4gQXMgU3RyaW5nID0gIl4oPz0uKltBLVphLXowLTldKVtBLVphLXowLTlcXC9ALiwjIF8tXSokIgoJCURpbSBzIEFzIFN0cmluZyA9ICIxMC8xMi8yMDE1IgoJCUNvbnNvbGUuV3JpdGVMaW5lKFJlZ2V4LklzTWF0Y2gocywgcGF0dGVybikpCglFbmQgU3ViCkVuZCBDbGFzcw==