Επιστρέφει μια Μεταβλητή (Ημερομηνία) που περιέχει την τρέχουσα ημερομηνία του συστήματος.
Σύνταξη
Date
Παρατηρήσεις
Για να ορίσετε την ημερομηνία του συστήματος, χρησιμοποιήστε την πρόταση Date .
Εάν χρησιμοποιείτε τη συνάρτηση Date με ένα γρηγοριανό ημερολόγιο, η συμπεριφορά του ορίσματος Ημερομηνία$ παραμένει αμετάβλητη από τη ρύθμιση της ιδιότητας Ημερολόγιο . Εάν το ημερολόγιο είναι Χίζρι, η συνάρτηση Date$ επιστρέφει μια συμβολοσειρά 10 χαρακτήρων της φόρμας mm-dd-yyyy, όπου τα mm (01-12), dd (01-30) και yyyy (1400-1523) είναι ο μήνας, η ημέρα και το έτος Hijri. Η αντίστοιχη γρηγοριανή σειρά είναι 1 Ιανουαρίου 1980 έως 31 Δεκεμβρίου 2099.
Παραδείγματα ερωτημάτων
|
Expression |
Αποτελέσματα |
|
SELECT Date() AS Παράσταση1 FROM ProductSales GROUP BY Date(); |
Επιστρέφει την τρέχουσα "ημερομηνία" του συστήματος σε μορφή σύντομης ημερομηνίας. Αποτέλεσμα: "ηη/μμ/yyyy". |
|
SELECT Date()-[DateofSale] AS DaysSinceSale FROM ProductSales; |
Επιστρέφει τη διαφορά μεταξύ του τρέχοντος συστήματος "Ημερομηνία" και των τιμών ημερομηνίας του πεδίου "DateofSale" ως αριθμό και εμφανίζει τα αποτελέσματα στη στήλη "DaySinceSale". |
Παραδείγματα VBA
Χρήση ημερομηνίας σε μια παράσταση Μπορείτε να χρησιμοποιήσετε τη συνάρτηση Date όπου μπορείτε να χρησιμοποιήσετε παραστάσεις. Για παράδειγμα, μπορείτε να ορίσετε την ιδιότητα Προέλευση στοιχείου ελέγχου ενός πλαισίου κειμένου σε μια φόρμα ως εξής:
=Date()
Όταν η φόρμα είναι ανοιχτή σε προβολή φόρμας, το πλαίσιο κειμένου εμφανίζει την τρέχουσα ημερομηνία του συστήματος.
Χρήση της συνάρτησης Date σε κώδικα VBA
Σημείωση: Παραδείγματα που ακολουθούν δείχνουν τη χρήση αυτής της συνάρτησης σε μια λειτουργική μονάδα Visual Basic for Applications (VBA). Για περισσότερες πληροφορίες σχετικά με την εργασία με τη VBA, επιλέξτε Αναφορά προγραμματιστών στην αναπτυσσόμενη λίστα δίπλα στην Αναζήτηση και πληκτρολογήστε έναν ή περισσότερους όρους στο πλαίσιο αναζήτησης.
Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση Date για να επιστρέψει την τρέχουσα ημερομηνία του συστήματος.
Dim MyDateMyDate = Date ' MyDate contains the current system date.
