Функция DateValue

Връща обект от тип Date по низ, представящ дата.

Върнатият обект се представя вътрешно като единична числова стойност, съответстваща на зададената дата. Тази стойност може да се използва за изчисляване на броя дни между две дати.

Синтаксис:


  DateValue(date As String)

Параметри:

date: низ, съдържащ датата, която ще бъде преобразувана към обект от тип Date.

note

The string passed to DateValue must be expressed in one of the date formats defined by your locale setting (see - Languages and Locales - General) or using the ISO date format "yyyy-mm-dd" (year, month and day separated by hyphens).


Резултат:

Date.

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

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

Пример:


  Sub ExampleDateValue
      Dim aDate As Date
      aDate = DateValue("2021-12-20")
      ' Отпечатва локализираната дата
      MsgBox aDate
      ' Извлича годината, месеца и деня от обекта дата
      MsgBox Year(aDate)
      MsgBox Month(aDate)
      MsgBox Day(aDate)
      ' Отпечатва числовата стойност, съответстваща на датата (като тип Long)
      MsgBox CLng(aDate)
  End Sub