Month
 
Получает месяц года из Date Serial (серийной даты)

Синтаксис

Declare Function Month ( ByVal date_serial As Double ) As Integer

Использование

#include "vbcompat.bi"
result = Month( date_serial )

Параметры

date_serial
дата

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

Возвращает номер месяца из переменной, содержащей дату в формате Date Serial (серийной даты).

Значения месяца находятся в диапазоне 1-12, где 1 - январь , а 12 - декабрь.

Описание


Компилятор не распознает эту функцию, если не подключен файл vbcompat.bi.

Пример

#include "vbcompat.bi"

Dim a As Double = DateSerial(2005,11,28) + TimeSerial(7,30,50)

Print Format(a, "yyyy/mm/dd hh:mm:ss "); Month(a)


Отличия от QB

  • Не существует в QB. Эта функция появилась в PDS и VBDOS

См. также