|
LastDay
(XAPI2000)
Deklaration VB 6.0
Function LastDay (ByVal Y As Long, ByVal M As Long) As Integer
Deklaration VB.NET
Function LastDay (ByVal Y As Integer, ByVal M As Integer) As
Integer
Beskrivning
Returnerar sista dagen (dagsnumret) i en specifik månad. Det
år och den månad som ska undersökas specificeras via parametrarna
Y och M (Y = år och M = månad). Värdet
på parametern M måste ligga inom intervallet 1-12. Funktionen
tar hänsyn till skottdagar.
Returvärden
Funktionen returnerar sista dagen för specificerad månad. Vid
fel returnerar funktionen 0. |
Exempel
Dim D As Integer
D = LastDay(2007, 2) ' Ger D = 28
D = LastDay(2008, 2) ' Ger D = 29 (år
2008 är ett skottår)
|
