Επιστρέφει έναν Ακέραιο που αντιπροσωπεύει το κωδικός χαρακτήρα που αντιστοιχεί στο πρώτο γράμμα μιας συμβολοσειράς.
Σύνταξη
Asc ( συμβολοσειρά )
Η απαιτούμενη συμβολοσειράόρισμα είναι οποιοσδήποτε έγκυρος παράσταση συμβολοσειράς. Εάν η συμβολοσειρά δεν περιέχει χαρακτήρες, προκύπτει σφάλμα χρόνου εκτέλεσης.
Παρατηρήσεις
Το εύρος για τις επιστροφές είναι 0 – 255 σε συστήματα που δεν είναι DBCS, αλλά –32768 – 32767 στα συστήματα DBCS.
Σημείωση: Η συνάρτηση AscB χρησιμοποιείται με δεδομένα byte που περιέχονται σε μια συμβολοσειρά. Αντί να επιστρέψει τον κωδικό χαρακτήρα για τον πρώτο χαρακτήρα, η ascB επιστρέφει το πρώτο byte. Η συνάρτηση AscW επιστρέφει τον κωδικό χαρακτήρα Unicode εκτός από τις πλατφόρμες όπου δεν υποστηρίζεται Unicode, οπότε η συμπεριφορά είναι ίδια με τη συνάρτηση Asc .
Σημείωση: Η Visual Basic για Macintosh δεν υποστηρίζει συμβολοσειρές Unicode. Επομένως, η ascW(n) δεν μπορεί να επιστρέψει όλους τους χαρακτήρες Unicode για n τιμές στην περιοχή από 128 έως 65.535, όπως στο περιβάλλον των Windows. Αντί για αυτό, η ascW(n) επιχειρεί μια "καλύτερη εκτίμηση" για τιμές Unicode n μεγαλύτερες από 127. Επομένως, δεν πρέπει να χρησιμοποιήσετε το AscW στο περιβάλλον Macintosh.
Παραδείγματα ερωτημάτων
|
Expression |
Αποτελέσματα |
|
SELECT Asc("a") AS Παράστ1 FROM Πωλήσεις Προϊόντων; |
Επιστρέφει τον κωδικό "ASCII" για τη συμβολοσειρά "a". Αποτέλεσμα: "97". |
|
SELECT Asc("Z") AS AscCode FROM ProductSales; |
Επιστρέφει τον κωδικό "ASCII" για τη συμβολοσειρά "Z" στη στήλη AscCode. Αποτέλεσμα: "90". |
Παράδειγμα VBA
Σημείωση: Παραδείγματα που ακολουθούν δείχνουν τη χρήση αυτής της συνάρτησης σε μια λειτουργική μονάδα Visual Basic for Applications (VBA). Για περισσότερες πληροφορίες σχετικά με την εργασία με τη VBA, επιλέξτε Αναφορά προγραμματιστών στην αναπτυσσόμενη λίστα δίπλα στην Αναζήτηση και πληκτρολογήστε έναν ή περισσότερους όρους στο πλαίσιο αναζήτησης.
Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση Asc για να επιστρέψει έναν κωδικό χαρακτήρα που αντιστοιχεί στο πρώτο γράμμα της συμβολοσειράς.
Dim MyNumberMyNumber = Asc("A") ' Returns 65.MyNumber = Asc("a") ' Returns 97.MyNumber = Asc("Apple") ' Returns 65.
