Συνάρτηση Len

Επιστρέφει ένα μήκος που περιέχει τον αριθμό των χαρακτήρων μιας συμβολοσειράς ή τον αριθμό των byte που απαιτούνται για την αποθήκευση ενός μεταβλητή.

Σύνταξη

Len( συμβολοσειρά | όνομα_varname)

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

Όρισμα

Περιγραφή

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

Οποιαδήποτε έγκυρη παράσταση συμβολοσειράς. Εάν η συμβολοσειρά περιέχει την τιμή Null, επιστρέφεται η τιμή Null.

όνομα_μεταβλητής

Οποιοδήποτε έγκυρο μεταβλητή ονόματος. Εάν το όνομα_συνάρτησης περιέχει την τιμή Null, επιστρέφεται η τιμή Null. Εάν το όνομα της μεταβλητής είναι Μεταβλητή, η Len την αντιμετωπίζει ως συμβολοσειρά και επιστρέφει πάντα τον αριθμό των χαρακτήρων που περιέχει.

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

Πρέπει να καθοριστεί ένα (και μόνο ένα) από τα δύο πιθανά ορίσματα. Όταν ο χρήστης έχει ορίσει τύπους, η Len επιστρέφει το μέγεθος όπως θα γραφτεί στο αρχείο.

Σημείωση:  Χρησιμοποιήστε τη συνάρτηση LenB με δεδομένα byte που περιέχονται σε μια συμβολοσειρά, όπως σε γλώσσες συνόλων χαρακτήρων των δύο byte (DBCS). Αντί να επιστρέψει τον αριθμό των χαρακτήρων σε μια συμβολοσειρά, η συνάρτηση LenB επιστρέφει τον αριθμό των byte που χρησιμοποιούνται για την αναπαράσταση αυτής της συμβολοσειράς. Με τύπους που ορίζονται από το χρήστη, η LenB επιστρέφει το μέγεθος στη μνήμη, συμπεριλαμβανομένης της αναπλήρωσης μεταξύ των στοιχείων. Για δείγμα κώδικα που χρησιμοποιεί τη χρήση της LenB,ανατρέξτε στο δεύτερο παράδειγμα στο θέμα του παραδείγματος.

Σημείωση: Η Len ενδέχεται να μην μπορεί να προσδιορίσει τον πραγματικό αριθμό των byte χώρου αποθήκευσης που απαιτούνται όταν χρησιμοποιείται με συμβολοσειρές μεταβλητού μήκους σε τύπους δεδομένων που ορίζονται από το χρήστη.

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

Παράσταση

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

SELECT ProductID, Len(ProductID) AS ProductLen FROM ProductSales.

Επιστρέφει τις τιμές από το πεδίο "ProductID" και το μήκος αυτών των τιμών στις στήλες ProductLen.

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

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

Το πρώτο παράδειγμα χρησιμοποιεί τη συνάρτηση Len για να επιστρέψει τον αριθμό των χαρακτήρων μιας συμβολοσειράς ή τον αριθμό των byte που απαιτούνται για την αποθήκευση μιας μεταβλητής. Ο τύπος... Το μπλοκ τύπου τέλους CustomerRecord πρέπει να προηγείται της λέξης-κλειδιού "Ιδιωτικό", εάν εμφανίζεται σε μια λειτουργική μονάδα κλάσης. Σε μια τυπική λειτουργική μονάδα, μια πρόταση Type μπορεί να είναι δημόσια.

Type CustomerRecord    ' Define user-defined type.
ID As Integer ' Place this definition in a
Name As String * 10 ' standard module.
Address As String * 30
End Type
Dim Customer As CustomerRecord ' Declare variables.
Dim MyInt As Integer, MyCur As Currency
Dim MyString, MyLen
MyString = "Hello World" ' Initialize variable.
MyLen = Len(MyInt) ' Returns 2.
MyLen = Len(Customer) ' Returns 42.
MyLen = Len(MyString) ' Returns 11.
MyLen = Len(MyCur) ' Returns 8.

Το δεύτερο παράδειγμα χρησιμοποιεί τη συνάρτηση LenB και μια συνάρτηση που ορίζεται από το χρήστη(LenMbcs)για να επιστρέψει τον αριθμό των χαρακτήρων byte σε μια συμβολοσειρά, εάν χρησιμοποιηθεί ANSI για την αναπαράσταση της συμβολοσειράς.

Function LenMbcs (ByVal str as String)
LenMbcs = LenB(StrConv(str, vbFromUnicode))
End Function
Dim MyString, MyLen
MyString = "ABc"
' Where "A" and "B" are DBCS and "c" is SBCS.
MyLen = Len(MyString)
' Returns 3 - 3 characters in the string.
MyLen = LenB(MyString)
' Returns 6 - 6 bytes used for Unicode.
MyLen = LenMbcs(MyString)
' Returns 5 - 5 bytes used for ANSI.

Δείτε επίσης

Συναρτήσεις συμβολοσειράς και πώς χρησιμοποιούνται

Χρειάζεστε περισσότερη βοήθεια;

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

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

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

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

×