Επιστρέφει έναν Integer τύπο που υποδεικνύει τον δευτερεύοντα τύπο μιας μεταβλητής.
Σύνταξη
VarType(varname)
Το απαιτούμενο varname όρισμα είναι αυτό Variant που περιέχει οποιαδήποτε μεταβλητή εκτός από έναν τύπο που ορίζεται από το χρήστη.
Τιμές επιστροφής
| Σταθερός | Τιμή | Περιγραφή |
|---|---|---|
vbEmpty |
0 | Κενό (χωρίς προετοιμασία) |
vbNull |
1 | Null (χωρίς έγκυρα δεδομένα) |
vbInteger |
2 | Ακέραιος |
vbLong |
3 | Ακέραιος μεγάλου μήκους |
vbSingle |
4 | Αριθμός κινητής υποδιαστολής μονής ακρίβειας |
vbDouble |
5 | Αριθμός κινητής υποδιαστολής διπλής ακρίβειας |
vbCurrency |
6 | Νομισματική αξία |
vbDate |
7 | Τιμή ημερομηνίας |
vbString |
8 | Συμβολοσειρά |
vbObject |
9 | Αντικείμενο |
vbError |
10 | Τιμή σφάλματος |
vbBoolean |
11 | Δυαδική τιμή |
vbVariant |
12 |
Variant (χρησιμοποιείται μόνο με πίνακες παραλλαγών) |
vbDataObject |
13 | Ένα αντικείμενο πρόσβασης δεδομένων |
vbDecimal |
14 | Δεκαδική τιμή |
vbByte |
17 | Τιμή byte |
vbUserDefinedType |
36 | Παραλλαγές που περιέχουν τύπους που ορίζονται από το χρήστη |
vbArray |
8192 | Πίνακας |
Σημείωση
Αυτές οι σταθερές ορίζονται από Visual Basic for Applications (VBA). Μπορείτε να χρησιμοποιήσετε τα ονόματα οπουδήποτε στον κώδικά σας αντί για τις πραγματικές τιμές.
Παρατηρήσεις
Η VarType συνάρτηση δεν επιστρέφει ποτέ μόνη της την τιμή vbArray . Προσθέτει πάντα την τιμή σε μια άλλη τιμή για να υποδείξει έναν πίνακα ενός συγκεκριμένου τύπου.
Η vbVariant σταθερά επιστρέφεται μόνο για vbArray να υποδείξει ότι το όρισμα VarType σε είναι ένας πίνακας τιμών Variant . Για παράδειγμα, η τιμή που επιστρέφεται για έναν πίνακα ακεραίων είναι vbInteger + vbArray, ή 8194.
Εάν ένα αντικείμενο έχει μια προεπιλεγμένη ιδιότητα, VarType(object) επιστρέφει τον τύπο της προεπιλεγμένης ιδιότητας του αντικειμένου.
Παράδειγμα
Σημείωση
Τα παραδείγματα που ακολουθούν δείχνουν τη χρήση αυτής της συνάρτησης σε μια λειτουργική μονάδα Visual Basic for Applications (VBA). Για περισσότερες πληροφορίες σχετικά με την εργασία με τη VBA, επιλέξτε " Αναφορά προγραμματιστών " στην αναπτυσσόμενη λίστα δίπλα στην επιλογή "Αναζήτηση " και εισαγάγετε έναν ή περισσότερους όρους στο πλαίσιο αναζήτησης.
Αυτό το παράδειγμα χρησιμοποιεί τη VarType συνάρτηση για τον προσδιορισμό του δευτερεύοντος τύπου μιας μεταβλητής.
Dim IntVar, StrVar, DateVar, MyCheck
' Initialize variables.
IntVar = 459
StrVar = "Hello World"
DateVar = #2/12/69#
MyCheck = VarType(IntVar) ' Returns 2.
MyCheck = VarType(DateVar) ' Returns 7.
MyCheck = VarType(StrVar) ' Returns 8.