为什么要使用正则表达式?将用户输入的日期解析为DateTime然后将其进行比较DateTime.Now以确保它更大是不是更容易?
这是一个例子:
Imports System
Class Test
Private Shared Sub Main()
Console.WriteLine(isFutureDate("5/16/1984"))
Console.WriteLine(isFutureDate("5/16/2010"))
End Sub
Private Shared Function isFutureDate(ByVal candidate As String) As Boolean
Dim future As DateTime
DateTime.TryParse(candidate, future)
Return future > DateTime.Now
End Function
End Class
Run Code Online (Sandbox Code Playgroud)