Visual Basic, .NET, ASP, VBA, VBScript
 
  Справочники  
  Справочник по Windows API Справочник по Visual Basic  
     
  Функция DateSerial  
 

Функция

DateSerial

Синтаксис

DateSerial(year, month, day)

Возвращает значение типа Variant (Date), соответствующее указанному году, месяцу и дню.

Параметры

Наименование

Описание

Year

Обязательный. Значение типа Integer. Число от 100 до 9999 включительно или числовое выражение.

Month

Обязательный. Значение типа Integer. Любое числовое выражение.

Day

Обязательный. Значение типа Integer. Любое числовое выражение.

Замечания

Функция использует именованные аргументы. Значение каждого аргумента функции DateSerial должно лежать в соответствующем диапазоне: 1 - 31 для дней и 1 - 12 для месяцев. Кроме того, можно использовать числовые выражения для описания относительной даты, т.е. на определенное число дней, месяцев и лет более поздней или ранней, чем указанная.
В следующем примере аргументами функции DateSerial являются не абсолютные значения, а числовые выражения. Таким образом определяется дата, на 1 день, 2 месяца и 10 лет более ранняя, чем 1 августа 1990 года, т.е. 31 мая 1980 года.
DateSerial(1990 - 10, 8 - 2, 1 - 1)
Значения аргумента year, лежащие между 0 и 99 включительно, соответствуют годам двадцатого столетия (1900 - 1999). При описании дат, не относящихся к двадцатому столетию, необходимо использовать все четыре цифры года (например, 1800).
Если значение какого-либо аргумента превышает максимально допустимое для него, то соответствующим образом увеличивается более старший компонент даты. Например, 35 дней означают 1 месяц и несколько оставшихся дней (в зависимости от числа дней в конкретном месяце). Однако если значение любого аргумента лежит вне диапазона -32 768 - 32 767, или сочетание всех трех аргументов описывает дату, лежащую вне допустимого диапазона дат, возникает ошибка.

Пример использования

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


Dim MyDate
'MyDate содержит дату, соответствующую 12 февраля 1969 года
MyDate = DateSerial(1969, 2, 12) 'возвращает дату

Дополнительная информация

Категория: Обработка данных дата/время

Еще функции: Date, DateAdd, DateDiff, DatePart, DateSerial, DateValue, Day, Hour, Minute, Month, MonthName, Now, Second, Time, Timer, TimeSerial, TimeValue, WeekDay, WeekDayName, Year

 
     
  VBNet online (всего: 51576)  
 

Логин:

Пароль:

Регистрация, забыли пароль?


В чате сейчас человек
 
     
  VBNet рекомендует  
   
     
  Лучшие материалы  
 
ActiveX контролы (112)
Hitman74_Library (36119)
WindowsXPControls (20739)
FlexGridPlus (19374)
DSMAniGifControl (18295)
FreeButton (15157)
Примеры кода (546)
Parol (18027)
Passworder (9299)
Screen saver (7654)
Kerish AI (5817)
Folder_L (5768)
Статьи по VB (136)
Мое второе впечатление... (11236)
VB .NET: дорога в будущее (11161)
Основы SQL (9225)
Сообщения Windows в Vi... (8788)
Классовая теория прогр... (8619)
 
     
Техническая поддержка MTW-хостинг | © Copyright 2002-2011 VBNet.RU | Пишите нам