GetFirstSpecWeekDay                              (XAPI2000)

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

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

Beskrivning
Denna funktion returnerar datum (dag) för första 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 första förekomsten av veckodagen finns i. Vid fel returnerar funktionen 0.

Se även
GetLastSpecWeekDay


Exempel 

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

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