IBM Lotus Symphony


Функция WeekDay [встроенная]

Возвращает номер дня недели, соответствующего порядковому номеру даты, созданному функцией DateSerial или DateValue.

Синтаксис:

WeekDay (Номер)

Возвращаемое значение:

Integer

Параметры:

Номер: целочисленное выражение, содержащее порядковый номер даты, определяющий день недели (1-7).

В следующем примере с помощью функции WeekDay определяется день недели по заданной дате.

Коды ошибок

5 Недопустимый вызов процедуры

Пример:

Sub ExampleWeekDay

Dim sDay As String

REM Определить и показать день недели

Select Case WeekDay( Now )

case 1

sDay="Воскресенье"

case 2

sDay="Понедельник"

case 3

sDay="Вторник"

case 4

sDay="Среда"

case 5

sDay="Четверг"

case 6

sDay="Пятница"

case 7

sDay="Суббота"

End Select

msgbox "" + sDay,64,"сегодня"

End Sub


Комментарии по продукту | Дополнительная документация | Товарные знаки