Ενεργοποιήστε τη JavaScript στον περιηγητή για να εμφανίσετε τις σελίδες βοήθειας Collabora Office.

Συνάρτηση DateValue

Επιστρέφει ένα αντικείμενο Date (ημερομηνίας) από μια συμβολοσειρά που αντιπροσωπεύει μια ημερομηνία.

Το επιστρεφόμενο αντικείμενο αναπαρίσταται εσωτερικά ως μια ενιαία αριθμητική τιμή που αντιστοιχεί στην καθορισμένη ημερομηνία. Αυτή η τιμή μπορεί να χρησιμοποιηθεί για τον υπολογισμό του αριθμού των ημερών μεταξύ δύο ημερομηνιών.

Σύνταξη:


  DateValue(ημερομηνία ως συμβολοσειρά)

Παράμετροι:

ημερομηνία: Μια συμβολοσειρά που περιέχει την ημερομηνία που θα μετατραπεί σε αντικείμενο Ημερομηνίας.

Η συμβολοσειρά που μεταβιβάστηκε στο DateValue πρέπει να εκφράζεται σε μία από τις μορφές ημερομηνίας που ορίζονται από την τοπική ρύθμιση (δείτε - Γλώσσες και τοπικές ρυθμίσεις - Γενικά), ή χρήση της μορφής ημερομηνίας ISO "εεεε-μμ-ηη" (έτος, μήνας και ημέρα χωρίζονται με παύλες).

Επιστρεφόμενη τιμή:

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

Συνάρτηση DateSerial