Συνάρτηση TimeSerial

Ισχύει για
Access για Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Επιστρέφει μια Μεταβλητή (Ημερομηνία) που περιέχει τη χρονική στιγμή για συγκεκριμένη ώρα, λεπτό και δευτερόλεπτο.

Σύνταξη

TimeSerial(ώρα; λεπτό; δευτερόλεπτο)

Προειδοποίηση Βεβαιωθείτε ότι τα ορίσματα βρίσκονται στη σωστή περιοχή τιμών. Ένα μη έγκυρο όρισμα μπορεί να οδηγήσει σε εσφαλμένο αποτέλεσμα.

Η σύνταξη της συνάρτησης TimeSerial περιλαμβάνει τα εξής ορίσματα:

Επιχείρημα Περιγραφή
ώρα Υποχρεωτικό. Μεταβλητή (Ακέραιος). Ένας αριθμός στο κλειστό διάστημα από 0 (12:00 Π.M.) έως 23 (11:00 Μ.M.) ή μια αριθμητική παράσταση.
λεπτό Υποχρεωτικό. Μεταβλητή (Ακέραιος). Οποιαδήποτε αριθμητική παράσταση.
Δεύτερον Υποχρεωτικό. Μεταβλητή (Ακέραιος). Οποιαδήποτε αριθμητική παράσταση.

Παρατηρήσεις

Για να καθορίσετε μια ώρα, όπως 11:59:59, η περιοχή αριθμών για κάθε όρισμα TimeSerial πρέπει να βρίσκεται στην κανονική περιοχή της μονάδας. Δηλαδή, 0-23 για ώρες και 0-59 για λεπτά και δευτερόλεπτα. Ωστόσο, μπορείτε επίσης να καθορίσετε σχετικές ώρες για κάθε όρισμα, χρησιμοποιώντας οποιαδήποτε αριθμητική παράσταση που αντιπροσωπεύει κάποιον αριθμό ωρών, λεπτών ή δευτερολέπτων πριν ή μετά από ένα συγκεκριμένο χρονικό διάστημα. Στο παρακάτω παράδειγμα χρησιμοποιούνται παραστάσεις αντί για απόλυτους αριθμούς χρόνου. Η συνάρτηση TimeSerial επιστρέφει μια ώρα 15 λεπτά πριν από-15 () έξι ώρες πριν από το μεσημέρι (12 - 6) ή 5:45:00 π.μ.

TimeSerial(12 - 6, -15, 0)

Όταν οποιοδήποτε όρισμα υπερβαίνει την κανονική περιοχή για το συγκεκριμένο όρισμα, αυξάνεται στην επόμενη μεγαλύτερη μονάδα όπως απαιτείται. Για παράδειγμα, εάν ορίσετε 75 λεπτά, αξιολογείται ως μία ώρα και 15 λεπτά. Εάν κάποιο μεμονωμένο όρισμα βρίσκεται εκτός της περιοχής -32.768 έως 32.767, παρουσιάζεται σφάλμα. Εάν η ώρα που καθορίζεται από τα τρία ορίσματα έχει ως αποτέλεσμα η ημερομηνία να είναι εκτός της αποδεκτής περιοχής ημερομηνιών, προκύπτει σφάλμα.

Παράδειγμα ερωτήματος

Έκφραση Αποτελέσματα
SELECT TimeSerial(18,12,10) AS NewTime FROM ProductSales GROUP BY TimeSerial(18,12,10); Επιστρέφει την τιμή "Χρόνος" που αποτελείται από καθορισμένη ώρα, λεπτό και δευτερόλεπτο που καταχωρείται στα ορίσματα της συνάρτησης και εμφανίζεται στη στήλη NewTime. Αποτέλεσμα: "6:12:10 μ.μ.".

Παράδειγμα VBA

Σημείωση

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

Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση TimeSerial για να επιστρέψει μια ώρα για την καθορισμένη ώρα, λεπτό και δευτερόλεπτο.

Dim MyTime
MyTime = TimeSerial(16, 35, 17)    
' MyTime contains serial representation of 4:35:17 PM.

Επιλογή της σωστής συνάρτησης ημερομηνίας