DateValid
(XAPI2000)
Deklaration VB 6.0
Function DateValid (ByVal Y As Long, ByVal M As Long, ByVal
D As Long) As Boolean
Deklaration VB.NET
Function DateValid (ByVal Y As Integer, ByVal M As Integer,
ByVal D As Integer) As Boolean
Beskrivning
Testar att ett datum är giltigt. Funktionen tar hänsyn till
eventuella skottdagar. Parametrarna Y, M och D
specificerar ett datum (år, månad och dag) som ska testas.
Returvärden
Funktionen returnerar True om datumet är korrekt eller
False om det är felaktigt. |
Exempel
If DateValid(2008, 12, 1) Then
Label1 = "Datumet är korrekt!"
Else
Label1 = "Datumet är felaktigt!"
End If
|