2009-11-24 4 views

Répondre

4

Pour vérifier si 16/01/2008 est une date valide, vous:

Dim result As Date 
If Date.TryParse("16/01/2008", result) Then 
    'The date is valid ' 
End If 

Maintenant, cela utilisera l'ensemble de la culture actuelle. Si vous voulez valider contre une culture spécifique, vous pouvez le faire comme celui-ci (par exemple avec la culture française):

If Date.TryParse("16/01/2008", Globalization.CultureInfo.GetCultureInfo("fr-FR"), _ 
       Globalization.DateTimeStyles.None, result) Then 
    'The date is valid ' 
End If 
2

Si le format de date dans vos données d'entrée est fixée à un mois/jour/année et ne non dépendent de la culture actuelle, vous devez utiliser DateTime.TryParseExact:

Public Shared Function IsValidInputDate(ByVal str As String) As Boolean 
    Dim dt as DateTime 
    Return DateTime.TryParseExact(str, "d/M/yyyy", Nothing, Globalization.DateTimeStyles.None, dt) 
End Function 
Questions connexes