GetLastSpecWeekDay                              (XAPI2000)

Deklaration VB 6.0
 Function GetLastSpecWeekDay (ByVal WD As Long, ByVal Year As Long, ByVal Month As Long) As Integer

Deklaration VB.NET
 Function GetLastSpecWeekDay (ByVal WD As Integer, ByVal Year As Integer, ByVal Month As Integer) As Integer

Beskrivning
Denna funktion returnerar datum (dag) för sista förekomsten av en specificerad veckodag i en månad. Parameter WD anger den veckodag (1-7) som ska hittas och parametrarna Year och Month anger år och månad som ska undersökas. För WD gäller att 1 = Måndag, 2 = Tisdag ... 7 = Söndag. 

Returvärden
Funktionen returnerar dagsnummer (1-31) i den specificerade månaden som den sista förekomsten av veckodagen finns i. Vid fel returnerar funktionen 0.

Se även
GetFirstSpecWeekDay


Exempel 

 Nedanstående exempel testar när den sista måndagen i April -99 inföll.

 Dim D As Integer
D = GetLastSpecWeekDay(1, 1999, 4) ' Ger D = 26 (den 26:e April)