Συνάρτηση Format

Παραδείγματα

Χρήση της συνάρτησης Format σε μια παράσταση    Μπορείτε να χρησιμοποιήσετε τη μορφοποίηση όπου μπορείτε να χρησιμοποιήσετε παραστάσεις. Για παράδειγμα, μπορείτε να το χρησιμοποιήσετε σε ένα ερώτημα ως μέρος ενός ψευδωνύμου πεδίου ή στην ιδιότητα Προέλευση στοιχείου ελέγχου ενός πλαισίου κειμένου σε μια φόρμα ή αναφορά. Τα παρακάτω παραδείγματα δείχνουν μια παράσταση που μπορείτε να χρησιμοποιήσετε στην ιδιότητα Filter μιας αναφοράς για να περιορίσετε το αποτέλεσμα σε εγγραφές από την προηγούμενη εβδομάδα.

Format([Date];"ww")=Format(Now();"ww")-1

Σε αυτό το παράδειγμα, η προέλευση εγγραφών της έκθεσης έχει ένα πεδίο με το όνομα Date, το οποίο περιέχει την ημερομηνία τροποποίησης κάθε συγκεκριμένης εγγραφής και το οποίο χρησιμοποιείται στην έκθεση. Όταν εκτελείτε την αναφορά, τα αποτελέσματά της φιλτράρονται ώστε να εμφανίζουν μόνο τις εγγραφές όπου η εβδομάδα για την τιμή στο πεδίο Ημερομηνία (Μορφή([Ημερομηνία];"ww")) είναι ίση με την προηγούμενη εβδομάδα (Format(Now(),"ww")-1).

Χρήση της συνάρτησης Format σε κώδικα VBA    

Αυτό το παράδειγμα δείχνει διάφορες χρήσεις της συνάρτησης Format για τη μορφοποίηση τιμών, χρησιμοποιώντας μορφές που ονομάζονται και μορφές που ορίζονται από το χρήστη. Για το διαχωριστικό ημερομηνίας (/), το διαχωριστικό ώρας (:) και την λεκτική σταθερά ΠΜ/ΜΜ, η πραγματική μορφοποιημένη έξοδος που εμφανίζεται από το σύστημά σας εξαρτάται από τις τοπικές ρυθμίσεις του υπολογιστή στον οποίο εκτελείται ο κώδικας. Όταν εμφανίζονται οι ώρες και οι ημερομηνίες στο περιβάλλον ανάπτυξης, χρησιμοποιείται η σύντομη μορφή ώρας και η σύντομη μορφή ημερομηνίας των τοπικών ρυθμίσεων κώδικα. Όταν εμφανίζεται με κώδικα που εκτελείται, χρησιμοποιείται η σύντομη μορφή ώρας και η μορφή σύντομης ημερομηνίας των τοπικών ρυθμίσεων συστήματος, οι οποίες μπορεί να διαφέρουν από τις τοπικές ρυθμίσεις κώδικα. Για αυτό το παράδειγμα, θεωρείται ίσο με τις αγγλικές τοπικές ρυθμίσεις των Η.Π.Α.

MyTime και MyDate εμφανίζονται στο περιβάλλον ανάπτυξης χρησιμοποιώντας την τρέχουσα ρύθμιση σύντομου χρόνου συστήματος και τη ρύθμιση σύντομης ημερομηνίας.

Dim MyTime, MyDate, MyStr
MyTime = #17:04:23#
MyDate = #January 27, 1993#
' Returns current system time in the system-defined long time format.
MyStr = Format(Time, "Long Time")
' Returns current system date in the system-defined long date format.
MyStr = Format(Date, "Long Date")
MyStr = Format(MyTime, "h:m:s")    ' Returns "17:4:23".
MyStr = Format(MyTime, "hh:mm:ss AMPM")    ' Returns "05:04:23 PM".
MyStr = Format(MyDate, "dddd, mmm d yyyy")    ' Returns "Wednesday,
    ' Jan 27 1993".
' If format is not supplied, a string is returned.
MyStr = Format(23)    ' Returns "23".
' User-defined formats.
MyStr = Format(5459.4, "##,##0.00")    ' Returns "5,459.40".
MyStr = Format(334.9, "###0.00")    ' Returns "334.90".
MyStr = Format(5, "0.00%")    ' Returns "500.00%".
MyStr = Format("HELLO", "<")    ' Returns "hello".
MyStr = Format("This is it", ">")    ' Returns "THIS IS IT".

Χρήση της μορφοποίησης με συμβολοσειρές μηδενικού μήκους

Στην έκδοση 2.0 και σε παλαιότερες εκδόσεις της Microsoft Access, μπορείτε να χρησιμοποιήσετε τη συνάρτηση Format για να επιστραφεί μια τιμή για ένα συμβολοσειρά μηδενικού μήκους και μια άλλη για μια τιμή. Για παράδειγμα, μπορείτε να χρησιμοποιήσετε μια παράσταση μορφής όπως η ακόλουθη με τη συνάρτηση Format για να λάβετε την κατάλληλη τιμή συμβολοσειράς από κώδικα:

Dim varX As Variant
Dim varStrX As Variant
' Assign some value to varStrX and pass to Format function.
varX = Format(varStrX, "@;ZLS;Null")

Στις εκδόσεις 97 και νεότερες εκδόσεις της Microsoft Access, πρέπει να ελέγξετε ξεχωριστά για την υπόθεση Null και, στη συνέχεια, να επιστραφεί η κατάλληλη τιμή με βάση το αποτέλεσμα. Για παράδειγμα, μπορείτε να χρησιμοποιήσετε τη συνάρτηση IIf σε μια παράσταση με τη συνάρτηση Format , όπως η εξής:

varX = IIf(IsNull(varStrX),"Null", Format(varStrX, "@;ZLS"))

Αυτή η αλλαγή ισχύει μόνο όταν χρησιμοποιείτε τη συνάρτηση Format για να μορφοποιήσετε μια συμβολοσειρά, ανάλογα με το αν πρόκειται για συμβολοσειρά μηδενικού μήκους ή τιμή Null. Άλλες παραστάσεις μορφοποίησης που χρησιμοποιούνται με τη συνάρτηση Format συνεχίζουν να λειτουργούν όπως στις προηγούμενες εκδόσεις.

Εάν μετατρέψετε μια βάση δεδομένων από τη Microsoft Access έκδοση 2.0 και παλαιότερη σε Microsoft Access 2002 ή νεότερη έκδοση, πρέπει να αλλάξετε κώδικα για να ελέγξετε ξεχωριστά για την υπόθεση Null.