Επιστρέφει μια Μεταβλητή (Ακέραιος) που υποδεικνύει το αποτέλεσμα μιας παράσταση συμβολοσειράς.
Σύνταξη
StrComp ( συμβολοσειρά1; συμβολοσειρά2 [, σύγκριση ] )
Η σύνταξη της συνάρτησης StrComp περιλαμβάνει τα παρακάτω ορίσματα:
|
Όρισμα |
Περιγραφή |
|
συμβολοσειρά1 |
Υποχρεωτικό. Οποιαδήποτε έγκυρη παράσταση συμβολοσειράς. |
|
συμβολοσειρά2 |
Υποχρεωτικό. Οποιαδήποτε έγκυρη παράσταση συμβολοσειράς. |
|
σύγκριση |
Προαιρετικό. Καθορίζει τον τύπο σύγκρισης συμβολοσειρών. Εάν τοόρισμασύγκρισης είναι Null, προκύπτει σφάλμα. Εάν παραλειφθεί το όρισμα σύγκριση , η ρύθμιση Σύγκριση επιλογών καθορίζει τον τύπο σύγκρισης. |
Ρυθμίσεις
Οι ρυθμίσεις του ορίσματος σύγκρισης είναι:
|
Σταθερά |
Τιμή |
Περιγραφή |
|
vbBinaryCompare |
0 |
Εκτελεί μια δυαδική σύγκριση. |
|
vbTextCompare |
1 |
Εκτελεί σύγκριση με βάση το κείμενο. |
|
vbDatabaseCompare |
2 |
μόνοMicrosoft Office Access 2007. Εκτελεί μια σύγκριση με βάση τις πληροφορίες στη βάση δεδομένων σας. |
Τιμές επιστροφής
Η συνάρτηση StrComp έχει τις ακόλουθες τιμές επιστροφής:
|
Εάν |
Η συνάρτηση StrComp επιστρέφει |
|
η συμβολοσειρά1 είναι μικρότερη από τη συμβολοσειρά2 |
-1 |
|
η συμβολοσειρά1 ισούται με τη συμβολοσειρά2 |
0 |
|
η συμβολοσειρά1 είναι μεγαλύτερη από τη συμβολοσειρά2 |
1 |
|
η συμβολοσειρά1 ή η συμβολοσειρά2 είναι Null |
Null |
Παράδειγμα ερωτήματος
|
Expression |
Αποτελέσματα |
|
SELECT ProductSales.ProductID, StrComp(ProductID;"PRO_XYZ10") AS ComparisonResult FROM ProductSales; |
Επιστρέφει τις τιμές από το πεδίο "Κωδ_Προϊόντος", συγκρίνει τις τιμές στο "Κωδ_Προϊόντος" με τη λέξη "PRO_XYZ1" και επιστρέφει τα αποτελέσματα στη στήλη ComparisonResult. Το "ProductID" είναι ίσο με το "PRO_XYZ10", η συνάρτηση StrComp θα επιστρέψει την τιμή 0. Εάν το "ProductID" είναι μικρότερο από το "PRO_XYZ10", η συνάρτηση StrComp θα επιστρέψει -1. Εάν το "ProductID" είναι μεγαλύτερο από το "PRO_XYZ10", η συνάρτηση StrComp θα επιστρέψει την τιμή 1. Εάν το όρισμα "ProductID" ή "PRO_XYZ10" είναι NULL, η συνάρτηση StrComp θα επιστρέψει την τιμή NULL. |
Παράδειγμα VBA
Σημείωση: Παραδείγματα που ακολουθούν δείχνουν τη χρήση αυτής της συνάρτησης σε μια λειτουργική μονάδα Visual Basic for Applications (VBA).
Αυτό το παράδειγμα χρησιμοποιεί τη συνάρτηση StrComp για να επιστρέψει τα αποτελέσματα μιας σύγκρισης συμβολοσειρών. Εάν το τρίτο όρισμα είναι 1, εκτελείται σύγκριση με βάση το κείμενο. Εάν το τρίτο όρισμα είναι 0 ή παραλείπεται, εκτελείται μια δυαδική σύγκριση.
Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd" ' Define variables.
MyComp = StrComp(MyStr1, MyStr2, 1) ' Returns 0.
MyComp = StrComp(MyStr1, MyStr2, 0) ' Returns -1.
MyComp = StrComp(MyStr2, MyStr1) ' Returns 1.
