ISDATE |
Est-ce une date ? |
---|---|
VB .NET (Visual Basic .NET) |
Syntaxe
Function IsDate(madate As String) As Boolean |
Paramètres
Nom | Description |
---|---|
madate | Ce paramètre permet d'indiquer la chaîne de caractères contenant la date |
Description
Cette fonction permet de vérifier que la chaîne de caractères contient une date valide.
Exemple
Voici un exemple d'une utilisation typique de cette fonction :
- Module Module1
-
- Sub Main()
- Dim Chaine As String
- Dim Nombre As Integer
- Dim TableauNombre() As Integer = {10, 20, 10, 4, 6, 1, 5}
- Dim TableauChaine() As String = {"ABC", "DEF", "GHI", "JKL"}
- Dim TableauMixed() As Object = {10, "A", "B", 5, "C", "D", 7}
- Chaine = "DEF"
- Nombre = 15
-
- Console.WriteLine("Date() = " & IsDate(Today))
- Console.WriteLine("TableauNombre = " & IsDate(TableauNombre))
- Console.WriteLine("TableauChaine = " & IsDate(TableauChaine))
- Console.WriteLine("TableauMixed = " & IsDate(TableauMixed))
- Console.WriteLine("Chaine = " & IsDate(Chaine))
- Console.WriteLine("Nombre = " & IsDate(Nombre))
- Console.WriteLine("2000-01-01 = " & IsDate("2000-01-01"))
- Console.WriteLine("08-01-01 = " & IsDate("08-01-01"))
- Console.WriteLine("74-01-01 = " & IsDate("74-01-01"))
- Console.WriteLine("02-02-2001 = " & IsDate("02-02-2001"))
- Console.WriteLine("3/21/11 = " & IsDate("3/21/11"))
- End Sub
-
- End Module
on obtiendra le résultat suivant :
Date() = TrueTableauNombre = False
TableauChaine = False
TableauMixed = False
Chaine = False
Nombre = False
2000-01-01 = True
08-01-01 = True
74-01-01 = True
02-02-2001 = True
3/21/11 = False
Dernière mise à jour : Dimanche, le 9 novembre 2014