Funkcja DateValue
Zwraca obiekt Date z łańcucha reprezentującego datę.
Zwrócony obiekt jest wewnętrznie reprezentowany jako pojedyncza wartość liczbowa odpowiadająca określonej dacie. Tej wartości można użyć do obliczenia liczby dni między dwiema datami.
DateValue(date As String)date: ciąg zawierający datę, która zostanie przekonwertowana na obiekt Date.
Ciąg przekazany do DateValue musi być wyrażony w jednym z formatów daty zdefiniowanych w ustawieniach regionalnych (patrz ) lub używając formatu daty ISO "yyyy-mm-dd" (rok, miesiąc i dzień oddzielone dywizami).
Date.
Sub ExampleDateValue
Dim aDate As Date
aDate = DateValue("2021-12-20")
' Wypisuje zlokalizowaną datę
MsgBox aDate
' Wyodrębnia rok, miesiąc i dzień z obiektu daty
MsgBox Year(aDate)
MsgBox Month(aDate)
MsgBox Day(aDate)
' Wypisuje wartość liczbową odpowiadającą dacie (jako typ Long)
MsgBox CLng(aDate)
End Sub