Συνάρτηση Year

Σημείωση:  Θέλουμε να σας παρέχουμε το πιο πρόσφατο περιεχόμενο βοήθειας στη γλώσσα σας όσο πιο σύντομα γίνεται. Αυτή η σελίδα έχω μεταφραστεί μέσω αυτοματοποιημένης διαδικασίας και ενδεχομένως να περιέχει γραμματικά λάθη και ανακρίβειες. Ο σκοπός μας είναι αυτό το περιεχόμενο να σας φανεί χρήσιμο. Μπορείτε να μας ενημερώσετε στο κάτω μέρος αυτής της σελίδας εάν οι πληροφορίες σάς φάνηκαν χρήσιμες; Εδώ θα βρείτε το άρθρο στα Αγγλικά , για να το συμβουλεύεστε εύκολα.

Επιστρέφει μια Μεταβλητή (Ακέραιος) που περιέχει έναν ακέραιο αριθμό, ο οποίος αναπαριστά το έτος.

Σύνταξη

Έτος ( ημερομηνία )

Την απαιτούμενη ημερομηνίαόρισμα είναι οποιαδήποτε μεταβλητή, αριθμητική παράσταση, παράσταση συμβολοσειράς ή οποιονδήποτε συνδυασμό από αυτά που μπορεί να αντιπροσωπεύει μια ημερομηνία. Εάν η ημερομηνία περιέχει Null, επιστρέφεται η τιμή Null .

Σημείωση: Εάν η ρύθμιση της ιδιότητας Ημερολόγιο είναι Γρηγοριανό, ο ακέραιος που επιστρέφεται αντιπροσωπεύει το γρηγοριανό έτος για το όρισμα ημερομηνία. Εάν το ημερολόγιο είναι Χίζρι, ο ακέραιος που επιστρέφεται αντιπροσωπεύει το έτος Χίζρι για το όρισμα ημερομηνία. Για τις ημερομηνίες Χίζρι, το όρισμα αριθμός είναι οποιαδήποτε αριθμητική παράσταση που μπορεί να αντιπροσωπεύει μια ημερομηνία ή/και την ώρα από 1/1/100 (Γρηγοριανό ημερολόγιο 2 Αυγ 718) έως 4/3/9666 (Γρηγοριανό ημερολόγιο 31 Δεκ 9999).

Παράδειγμα

Σημείωση: Παραδείγματα που ακολουθούν δείχνουν τη χρήση αυτής της συνάρτησης σε ένα έργο Visual Basic για τη λειτουργική μονάδα Applications (VBA). Για περισσότερες πληροφορίες σχετικά με την εργασία με τη VBA, επιλέξτε Αναφορά προγραμματιστών στην αναπτυσσόμενη λίστα δίπλα στο στοιχείο Αναζήτηση και πληκτρολογήστε μία ή περισσότερες όρων στο πλαίσιο αναζήτησης.

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

Dim MyDate, MyYear
MyDate = #February 12, 1969# ' Assign a date.
MyYear = Year(MyDate) ' MyYear contains 1969.
Αναπτύξτε τις δεξιότητές σας στο Office
Εξερευνήστε το περιεχόμενο της εκπαίδευσης
Αποκτήστε πρώτοι τις νέες δυνατότητες
Γίνετε μέλος του Office Insider

Σας βοήθησαν αυτές οι πληροφορίες;

Σας ευχαριστούμε για τα σχόλιά σας!

Σας ευχαριστούμε για τα σχόλιά σας! Φαίνεται ότι μπορεί να είναι χρήσιμο να συνδεθείτε με έναν από τους συνεργάτες υποστήριξης του Office.

×