| |
Функция DatePart | | Синтаксис DatePart(interval, date[,firstdayofweek[, firstweekofyear]]) | Возвращает значение типа Variant (Integer), содержащее указанный компонент даты. Функция DatePart предназначена для определения указанного компонента даты. Например, с помощью этой функции можно определить день недели или текущий час. Аргумент firstdayofweek влияет на вычисления, использующие временные интервалы типа "w" и "ww".
Если дата задается как литерал даты, указанный год становится постоянной частью даты. Однако если дата заключается в прямые кавычки (" "), а год опущен, то при каждом вычислении выражения даты в него будет подставляться текущий год. Это позволяет написать код, который может использоваться в течение нескольких лет. | Параметры Наименование | Описание | Interval | Обязательный. Строковое выражение, определяющее тип возвращаемого временного интервала.
| Date | Обязательный. Значение типа Variant (Date), представляющее дату, подлежащую обработке.
| FirstDayOfWeek | Необязательный. Константа, указывающая первый день недели. Если этот аргумент опущен, считается, что неделя начинается с воскресенья.
| FirstWeekOfYear | Необязательный. Константа, указывающая первую неделю года. Если этот аргумент опущен, первой неделей считается неделя, содержащая 1 января. |
| Замечания
| Аргумет firstdayofweek может
принимает следующие значения: |
| Константа |
Значение |
Описание |
| vbUseSystem |
0 |
Use the NLS API setting. |
| vbSunday |
1 |
Воскресенье (по умолчанию) |
| vbMonday |
2 |
Понедельник |
| vbTuesday |
3 |
Вторник |
| vbWednesday |
4 |
Среда |
| vbThursday |
5 |
Четверг |
| vbFriday |
6 |
Пятница |
| vbSaturday |
7 |
Суббота |
| Аргумет firstweekofyear может
принимает следующие значения: |
| Константа |
Значение |
Описание |
| vbUseSystem |
0 |
Use the NLS API setting. |
| vbFirstJan1 |
1 |
Начинать с недели: 1 января (по
умолчанию). |
| vbFirstFourDays |
2 |
Начинать с первой недели,
которая имеет хотя бы один день нового
года. |
| vbFirstFullWeek |
3 |
Начинать с полной первой
недели нового года. |
| Пример использования 'в данном примере функция DatePart используется для
'определения квартала, к которому относится указанная дата
Dim TheDate As Date 'объявляет переменные
Dim Msg
TheDate = InputBox("Введите дату:")
Msg = "Квартал: " & DatePart("к", TheDate)
MsgBox Msg | Дополнительная информация Категория: Обработка данных дата/время Еще функции: Date, DateAdd, DateDiff, DatePart, DateSerial, DateValue, Day, Hour, Minute, Month, MonthName, Now, Second, Time, Timer, TimeSerial, TimeValue, WeekDay, WeekDayName, Year |
|
|
Справочник по Visual Basic