2009-11-11 47 views
-1

我正在使用下面的正则表达式在日期验证的情况下工作正常。但是,如果我从DatePicket中选择日期,那么它将引发警报:输入有效的日期。我如何修改正则表达式以便与DatePicker兼容。DatetimePicker:无效注册表编号

Set RegularExpressionObject = New RegExp 

With RegularExpressionObject 
    .Pattern = "^(((0?[1-9]|[12]\d|3[01]).-\/.-\/?\d{2}))|((0?[1-9]|[12]\d|30).-\/.-\/?\d{2}))|((0?[1-9]|1\d|2[0-8])[.-\/]0?2.-\/?\d{2}))|(29[.-\/]0?2.-\/?(0[48]|[2468][048]|[13579][26])|((16|[2468][048]|[3579][26])00)|00)))$" 
    .IgnoreCase = True 
    .Global = True 
End With 
expressionmatch = RegularExpressionObject.Test(TxtVal) 

If expressionmatch Then 

Else 
    msgbox "You must enter a valid Date.",,"Invalidentry" 
    form1.item(OHldr).focus() 
    Exit Function 
End if 
+0

格式化代码可能会使其更具可读性 – Dean 2009-11-12 10:42:36

回答

0

我知道这不是你要问的,但有一个更简单的方法来验证日期时间。正则表达式很好,但有时候有一种更简单的方法。

使用CustomeValidator,并在Server_Validate事件,请执行下列操作:

bool IsValidDate = false; 
if(System.DateTime.TryParse(SomeValue)) 
{ 
    IsValidDate = true; 
} 

return IsValidDate; 
0

您可以使用If Date.TryParse(s, d) Then ...其中s是一个字符串,d是一个日期。 date.tryparse对于有效日期返回true,对于无效日期则返回false。如果日期有效,则将其转换为d中的日期数据类型。