IBM Lotus Symphony
|
Palauttaa numeron, joka vastaa viikonpäivää DateSerial-funktion tai DateValue-funktion luomassa sarjapäivämääränumerossa.
WeekDay (Number)
Kokonaisluku
Number: Kokonaislukulauseke, joka sisältää sarjapäivämääränumeron, jonka avulla lasketaan viikonpäivä (1 - 7).
Seuraava esimerkki määrittää viikonpäivän WeekDay-funktion avulla, kun annat päivämäärän.
Sub ExampleWeekDay
Dim sDay As String
REM Palauta ja näytä viikonpäivä
Select Case WeekDay( Now )
case 1
sDay="Sunday"
case 2
sDay="Monday"
case 3
sDay="Tuesday"
case 4
sDay="Wednesday"
case 5
sDay="Thursday"
case 6
sDay="Friday"
case 7
sDay="Saturday"
End Select
msgbox "" + sDay,64,"Today is"
End Sub