LibreOfficeDev 24.2 Βοήθεια
Επιστρέφει ένα αντικείμενο Date (ημερομηνίας) από μια συμβολοσειρά που αντιπροσωπεύει μια ημερομηνία.
Το επιστρεφόμενο αντικείμενο αναπαρίσταται εσωτερικά ως μια ενιαία αριθμητική τιμή που αντιστοιχεί στην καθορισμένη ημερομηνία. Αυτή η τιμή μπορεί να χρησιμοποιηθεί για τον υπολογισμό του αριθμού των ημερών μεταξύ δύο ημερομηνιών.
DateValue(ημερομηνία ως συμβολοσειρά)
ημερομηνία: Μια συμβολοσειρά που περιέχει την ημερομηνία που θα μετατραπεί σε αντικείμενο Ημερομηνίας.
The string passed to DateValue must be expressed in one of the date formats defined by your locale setting (see ) or using the ISO date format "yyyy-mm-dd" (year, month and day separated by hyphens).
Date.
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