Συναρτήσεις μετατροπής τύπου

Κάθε συνάρτηση μετατρέπει μια παράσταση σε μια συγκεκριμένη τύπος δεδομένων.

Σύνταξη

CBool ( παράσταση )

CByte ( παράσταση )

CCur ( παράσταση )

CDate ( παράσταση )

CDbl ( παράσταση )

CDec ( παράσταση )

CInt ( παράσταση )

CLng ( παράσταση )

CSng ( παράσταση )

CStr ( παράσταση )

CVar ( παράσταση )

Η απαιτούμενη παράστασηόρισμα είναι οποιαδήποτε παράσταση συμβολοσειράς ή αριθμητική παράσταση.

Τύποι επιστροφής

Το όνομα της συνάρτησης καθορίζει τον τύπο επιστροφής, όπως φαίνεται στα εξής:

Συνάρτηση

Τύπος επιστροφής

Περιοχή για παράσταση όρισμα

CBool

δυαδική τιμή

Οποιαδήποτε έγκυρη συμβολοσειρά ή αριθμητική παράσταση.

CByte

Byte

0 έως 255.

CCur

Νομισματική μονάδα

-922.337.203.685.477,5808 έως 922.337.203.685.477,5807.

CDate

Ημερομηνία

Οποιαδήποτε έγκυρη παράσταση ημερομηνίας.

CDbl

Double

-1.79769313486231 e308 to
-4.94065645841247 e-324 για τις αρνητικές τιμές, 4.94065645841247 e-324 στο 1.79769313486232 E308 για θετικές τιμές.

CDec

Δεκαδικός

+/-79228162514264337593543950335 για αριθμούς με μηδενική κλίμακα, δηλαδή αριθμούς χωρίς δεκαδικά ψηφία. Για αριθμούς με 28 δεκαδικά ψηφία, η περιοχή
είναι +/-7.9228162514264337593543950335. Ο μικρότερος δυνατός, μη μηδενικός αριθμός είναι 0,0000000000000000000000000001.

CInt

Ακέραιος

-32.768 έως 32.767; τα κλάσματα στρογγυλοποιούνται.

CLng

Καιρό

-2.147.483.648 έως 2.147.483.647; τα κλάσματα στρογγυλοποιούνται.

CSng

Single

-3.402823 E38 to-1.401298 E-45 για τις αρνητικές τιμές, 1.401298 e-45 στο 3.402823 E38 για θετικές τιμές.

CStr

Συμβολοσειρά

Οι επιστροφές για το CStr εξαρτώνται από το όρισμα παράσταση .

CVar

Μεταβλητή

Ίδιο εύρος με τον τύπο Διπλής ακρίβειας για αριθμητικές τιμές. Ίδιο εύρος με τον τύπο Συμβολοσειρά για μη αριθμητικές τιμές.

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

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

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

Θα πρέπει να χρησιμοποιήσετε τις συναρτήσεις μετατροπής τύπου δεδομένων αντί για την Val για να παρέχετε διεθνώς ενήμερες μετατροπές από έναν τύπο δεδομένων σε έναν άλλο. Για παράδειγμα, όταν χρησιμοποιείτε το CCur, διαφορετικά διαχωριστικά δεκαδικών ψηφίων, διαφορετικά διαχωριστικά χιλιάδων και διάφορες επιλογές νομισματικής μονάδας αναγνωρίζονται σωστά, ανάλογα με τη ρύθμιση τοπικών ρυθμίσεων του υπολογιστή σας.

Όταν το κλασματικό τμήμα είναι ακριβώς 0,5, το CINT και το CLng πάντα γύρω από αυτό στον πλησιέστερο ακόμα αριθμό. Για παράδειγμα, το 0,5 στρογγυλοποιεί σε 0 και το 1,5 στρογγυλοποιεί στο 2. Το CINT και το CLng διαφέρουν από τις συναρτήσεις Fix και int , οι οποίες περικόπτουν, αντί για στρογγυλοποίηση, το κλασματικό τμήμα ενός αριθμού. Επίσης, η επιδιόρθωση και το int επιστρέφουν πάντα μια τιμή του ίδιου τύπου με την οποία μεταβιβάζεται.

Χρησιμοποιήστε τη συνάρτηση IsDate για να προσδιορίσετε εάν η ημερομηνία μπορεί να μετατραπεί σε ημερομηνία ή ώρα. Το CDate αναγνωρίζει τις τιμές ημερομηνίας και ώρας, καθώς και ορισμένους αριθμούς που εμπίπτουν στην περιοχή των αποδεκτών ημερομηνιών. Κατά τη μετατροπή ενός αριθμού σε μια ημερομηνία, ολόκληρο το τμήμα του αριθμού μετατρέπεται σε ημερομηνία. Κάθε κλασματικό τμήμα του αριθμού μετατρέπεται σε ώρα της ημέρας, ξεκινώντας από τα μεσάνυχτα.

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

Μια συνάρτηση CVDate παρέχεται επίσης για συμβατότητα με προηγούμενες εκδόσεις της Visual Basic. Η σύνταξη της συνάρτησης CVDate είναι πανομοιότυπη με τη συνάρτηση CDate , ωστόσο, η CVDate επιστρέφει μια παραλλαγή της οποίας ο δευτερεύων τύπος είναι ημερομηνία αντί για πραγματικός τύπος ημερομηνίας . Εφόσον τώρα υπάρχει ένας εγγενής τύπος ημερομηνίας , δεν υπάρχει περαιτέρω ανάγκη για CVDate. Το ίδιο αποτέλεσμα μπορεί να επιτευχθεί με τη μετατροπή μιας παράστασης σε ημερομηνία και, στη συνέχεια, την εκχώρησή της σε μια παραλλαγή. Αυτή η τεχνική είναι συνεπής με τη μετατροπή όλων των άλλων εγγενών τύπων σε ισοδύναμες υποκατηγορίες Variant .

Σημείωση:  Η συνάρτηση CDec δεν επιστρέφει έναν ξεχωριστό τύπο δεδομένων. αντί για αυτό, επιστρέφει πάντα μια παραλλαγή της οποίας η τιμή έχει μετατραπεί σε υποκατηγορία δεκαδικών ψηφίων .

Παραδείγματα ερωτημάτων

Παράσταση

Αποτελέσματα

Επιλέξτε SalePrice, FinalPrice, CBool (SalePrice>FinalPrice) ως Έκφρ1 από το productSales.

Επιστρέφει τη φράση "SalePrice", "FinalPrice" και αξιολογεί εάν το SalePrice είναι μεγαλύτερο από την τελική τιμή. Επιστρέφει "-1" Εάν είναι TRUE και "0" Εάν είναι FALSE.

Επιλέξτε αναγνωριστικό προϊόντος, CByte (ποσότητα) ως Έκφρ1 από το productSales.

Επιστρέφει τη φράση "Αναγνωριστικό προϊόντος", μετατρέπει τις τιμές στο πεδίο "ποσότητα" σε μορφή byte και εμφανίζει τη στήλη Έκφρ1 επιστρέφει "Αναγνωριστικό προϊόντος", μετατρέπει τις τιμές στο πεδίο "ποσότητα" σε μορφή νομισματικής μονάδας και εμφανίζεται στη στήλη Έκφρ1.

Επιλέξτε αναγνωριστικό προϊόντος, CDate (DateofSale) ως Έκφρ1 από το productSales.

Επιστρέφει τη φράση "Αναγνωριστικό προϊόντος", μετατρέπει τις τιμές στο πεδίο "DateofSale" σε μορφή ημερομηνίας και εμφανίζεται στη στήλη Έκφρ1.

Επιλέξτε αναγνωριστικό προϊόντος, CDbl (έκπτωση) ως Έκφρ1 από το productSales.

Επιστρέφει τη φράση "Αναγνωριστικό προϊόντος", μετατρέπει τις τιμές στο πεδίο "έκπτωση" σε διπλή μορφοποίηση και εμφανίζεται στη στήλη Έκφρ1.

Επιλέξτε αναγνωριστικό προϊόντος, CInt (έκπτωση) ως Έκφρ1 από το productSales.

Επιστρέφει τη φράση "Αναγνωριστικό προϊόντος", μετατρέπει τις τιμές στο πεδίο "έκπτωση" σε μορφή ακέραιου και εμφανίζεται στη στήλη Έκφρ1.

Επιλέξτε αναγνωριστικό προϊόντος, CLng (έκπτωση) ως Έκφρ1 από το productSales.

Επιστρέφει τη φράση "Αναγνωριστικό προϊόντος", μετατρέπει τις τιμές στο πεδίο "έκπτωση" σε μεγάλη μορφή και εμφανίζεται στη στήλη Έκφρ1.

Επιλέξτε αναγνωριστικό προϊόντος, CSng (έκπτωση) ως Έκφρ1 από το productSales.

Επιστρέφει τη φράση "Αναγνωριστικό προϊόντος", μετατρέπει τις τιμές στο πεδίο "έκπτωση" σε μεμονωμένη μορφή και εμφανίζεται στη στήλη Έκφρ1.

Επιλέξτε αναγνωριστικό προϊόντος, CStr (έκπτωση) ως Έκφρ1 από το productSales.

Επιστρέφει τη φράση "Αναγνωριστικό προϊόντος", μετατρέπει τις τιμές στο πεδίο "έκπτωση" σε μορφή συμβολοσειράς και εμφανίζεται στη στήλη Έκφρ1.

Επιλέξτε αναγνωριστικό προϊόντος, CVar (έκπτωση) ως Έκφρ1 από το productSales.

Επιστρέφει τη φράση "Αναγνωριστικό προϊόντος", μετατρέπει τις τιμές στο πεδίο "έκπτωση" στο διπλάσιο για αριθμητικές τιμές και συμβολοσειρά για μη αριθμητικές τιμές.

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

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

Συνάρτηση CBool

Συμβουλή:  Η Δόμηση παραστάσεων με το IntelliSense που αρχίζει από την Access 2010 σάς βοηθά να κάνετε τις παραστάσεις σας σωστές.

Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση CBool για τη μετατροπή μιας παράστασης σε δυαδική τιμή. Εάν η παράσταση αποτιμάται σε μη μηδενική τιμή, η συνάρτηση CBool επιστρέφει την τιμή True. διαφορετικά, επιστρέφει την τιμή FALSE.

Dim A, B, Check
A = 5: B = 5 ' Initialize variables.
Check = CBool(A = B) ' Check contains True.
A = 0 ' Define variable.
Check = CBool(A) ' Check contains False.

Συνάρτηση CByte

Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση CByte για τη μετατροπή μιας παράστασης σε byte.

Dim MyDouble, MyByte
MyDouble = 125.5678 ' MyDouble is a Double.
MyByte = CByte(MyDouble) ' MyByte contains 126.

Συνάρτηση CCur

Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση CCur για τη μετατροπή μιας παράστασης σε Νομισματική μονάδα.

Dim MyDouble, MyCurr
MyDouble = 543.214588 ' MyDouble is a Double.
MyCurr = CCur(MyDouble * 2)
' Convert result of MyDouble * 2 (1086.429176) to a
' Currency (1086.4292).

Συνάρτηση CDate

Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση CDate για να μετατρέψει μια συμβολοσειρά σε ημερομηνία. Γενικά, δεν συνιστάται η εμφάνιση των ημερομηνιών και των ωρών του σκληρού κωδικοποίησης ως συμβολοσειρών (όπως φαίνεται σε αυτό το παράδειγμα). Χρησιμοποιήστε τις σταθερές ημερομηνίας και τα χρονικά διαστήματα, όπως #2/12/1969 # και #4:45:23 μμ #, αντ ' αυτού.

Dim MyDate, MyShortDate, MyTime, MyShortTime
MyDate = "February 12, 1969"
' Convert to Date data type.
MyShortDate = CDate(MyDate)
MyTime = "4:35:47 PM"
' Convert to Date data type.
MyShortTime = CDate(MyTime)

Συνάρτηση CDbl

Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση CDbl για να μετατρέψει μια παράσταση σε διπλή.

Dim MyCurr, MyDouble
MyCurr = CCur(234.456784)
' Convert result to a Double.
MyDouble = CDbl(MyCurr * 8.2 * 0.01)

Συνάρτηση CDec

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

Dim MyDecimal, MyCurr
MyCurr = 10000000.0587 ' MyCurr is a Currency.
MyDecimal = CDec(MyCurr) ' MyDecimal is a Decimal.

Συνάρτηση CInt

Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση CINT για να μετατρέψει μια τιμή σε ακέραιο.

Dim MyDouble, MyInt
MyDouble = 2345.5678 ' MyDouble is a Double.
MyInt = CInt(MyDouble) ' MyInt contains 2346.

Συνάρτηση CLng

Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση CLng για να μετατρέψει μια τιμή σε μεγάλη.

Dim MyVal1, MyVal2, MyLong1, MyLong2
MyVal1 = 25427.45
MyVal2 = 25427.55 ' MyVal1, MyVal2 are Doubles.
MyLong1 = CLng(MyVal1)
' MyLong1 contains 25427.
MyLong2 = CLng(MyVal2)
' MyLong2 contains 25428.

Συνάρτηση CSng

Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση CSng για να μετατρέψει μια τιμή σε μεμονωμένη.

Dim MyDouble1, MyDouble2, MySingle1, MySingle2
' MyDouble1, MyDouble2 are Doubles.
MyDouble1 = 75.3421115: MyDouble2 = 75.3421555
MySingle1 = CSng(MyDouble1)
' MySingle1 contains 75.34211.
MySingle2 = CSng(MyDouble2)
' MySingle2 contains 75.34216.

Συνάρτηση CStr

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

Dim MyDouble, MyString
MyDouble = 437.324 ' MyDouble is a Double.
MyString = CStr(MyDouble)
' MyString contains "437.324".

Συνάρτηση CVar

Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση cvar για να μετατρέψει μια παράσταση σε μια παραλλαγή.

Dim MyInt, MyVar
MyInt = 4534 ' MyInt is an Integer.
MyVar = CVar(MyInt & "000")
' MyVar contains the string 4534000.

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

Αναπτύξτε τις δεξιότητές σας στο Office
Εξερευνήστε το περιεχόμενο της εκπαίδευσης
Αποκτήστε πρώτοι τις νέες δυνατότητες
Γίνετε μέλος του Office Insider

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

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

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

×