Съдържание
Индекс 🔎︎

# Функция WeekDay

Приема серийно число, генерирано от функцията DateSerial или DateValue и връща число, съответстващо на деня от седмицата.

## Синтаксис:

    WeekDay (Number)

## Връщана стойност:

Integer

## Параметри:

Number: числов израз – серийно число на дата, за която искате да бъде изчислен денят от седмицата (1-7).

Следващият пример определя деня от седмицата чрез функцията WeekDay според въведена от вас дата.

## Кодове за грешка:

5 Невалидно извикване на процедура

## Пример:

    Sub ExampleWeekDay
    Dim sDay As String
    ' Връща и показва деня от седмицата
        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