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 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(1999, 2) ' Ger D = 28
D = LastDay(2000, 2) ' Ger D = 29  (år 2000 är ett skottår)