Επιστρέφει μια τιμή Εκτεταμένης ακρίβειας που περιέχει τον μικρότερο διαθέσιμο δείκτη για την υποδεικνυόμενη διάσταση ενός πίνακας.
Σύνταξη
LBound ( όνομα πίνακα [, διάσταση ] )
Η σύνταξη της συνάρτησης LBound περιλαμβάνει τα παρακάτω ορίσματα:
Όρισμα |
Περιγραφή |
όνομα πίνακα |
Υποχρεωτικό. Το όνομα του πίνακα μεταβλητή; ακολουθεί τυπικές συμβάσεις μεταβλητής ονοματοθεσίας. |
διάσταση |
Προαιρετικό. Μεταβλητή (Μεγάλης ακρίβειας). Ακέραιος αριθμός που υποδεικνύει το κατώτερο όριο διάστασης που επιστρέφεται. Χρησιμοποιήστε 1 για την πρώτη διάσταση, 2 για τη δεύτερη και ούτω καθεξής. Εάν παραλειφθεί το όρισμα διάσταση , λαμβάνεται το 1. |
Παρατηρήσεις
Η συνάρτηση LBound χρησιμοποιείται με τη συνάρτηση UBound για τον καθορισμό του μεγέθους ενός πίνακα. Χρησιμοποιήστε τη συνάρτηση UBound για να βρείτε το ανώτερο όριο μιας διάστασης πίνακα.
Η συνάρτηση LBound επιστρέφει τις τιμές στον παρακάτω πίνακα για έναν πίνακα με τις ακόλουθες διαστάσεις:
Dim A(1 To 100, 0 To 3, -3 To 4)
Δήλωση |
Τιμή επιστροφής |
LBound(A, 1) |
1 |
LBound(A, 2) |
0 |
LBound(A, 3) |
-3 |
Το προεπιλεγμένο κατώτερο όριο για οποιαδήποτε διάσταση είναι 0 ή 1, ανάλογα με τη ρύθμιση της πρότασης OptionBase . Η βάση ενός πίνακα που δημιουργήθηκε με τη συνάρτηση Πίνακας είναι μηδέν. δεν επηρεάζεται από τη Βάση επιλογών.
Οι πίνακες για τους οποίους έχουν οριστεί διαστάσεις χρησιμοποιώντας τον όρο Προς σε μια πρόταση Dim, Private, Public, ReDim ή Static μπορούν να έχουν οποιαδήποτε ακέραια τιμή ως κατώτερο όριο.
Παράδειγμα
Σημείωση: Παραδείγματα που ακολουθούν δείχνουν τη χρήση αυτής της συνάρτησης σε μια λειτουργική μονάδα Visual Basic for Applications (VBA). Για περισσότερες πληροφορίες σχετικά με την εργασία με τη VBA, επιλέξτε Αναφορά προγραμματιστών στην αναπτυσσόμενη λίστα δίπλα στην Αναζήτηση και πληκτρολογήστε έναν ή περισσότερους όρους στο πλαίσιο αναζήτησης.
Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση LBound για να καθορίσει τον μικρότερο διαθέσιμο δείκτη για την υποδεικνυόμενη διάσταση ενός πίνακα. Χρησιμοποιήστε την πρόταση Option Base για να παρακάμψετε την προεπιλεγμένη τιμή δείκτη πίνακα βάσης 0.
Dim Lower
' Declare array variables. Dim MyArray(1 To 10, 5 To 15, 10 To 20) Dim AnyArray(10) Lower = Lbound(MyArray, 1) ' Returns 1. Lower = Lbound(MyArray, 3) ' Returns 10. Lower = Lbound(AnyArray) ' Returns 0 or 1, depending on setting of Option Base.