إرجاع متغير (عدد صحيح) يشير إلى نتيجة تعبير سلسلة.
بناء الجملة
StrComp(string1, string2 [, compare ] )
يحتوي بناء جملة الدالة StrComp على الوسيطات التالية:
| الوسيطة | الوصف |
|---|---|
| سلسلة 1 | مطلوبة. أي تعبير سلسلة صحيح. |
| سلسلة 2 | مطلوبة. أي تعبير سلسلة صحيح. |
| مقارنة | اختيارية. تحديد نوع مقارنة السلسلة. إذا كانت وسيطة المقارنةNull، يحدث خطأ. إذا تم حذف المقارنة ، يحدد إعداد مقارنة الخيار نوع المقارنة. |
إعدادات
إعدادات وسيطة المقارنة هي:
| القيمة الثابتة | Value | الوصف |
|---|---|---|
| vbBinaryCompare | 0 | ينفذ مقارنة ثنائية. |
| vbTextCompare | 1 | ينفذ مقارنة نصية. |
إرجاع القيم
تتضمن الدالة StrComp القيم المرتجعة التالية:
| إذا | ترجع StrComp |
|---|---|
| السلسلة1 أقل من سلسلة2 | -1 |
| String1 تساوي String2 | 0 |
| السلسلة1 أكبر من سلسلة 2 | 1 |
| السلسلة 1 أو السلسلة 2فارغة | فارغ |
مثال استعلام
| التعبير | النتائج |
|---|---|
| SELECT ProductSales.ProductID, StrComp(ProductID,"PRO_XYZ10") AS ComparisonResult FROM ProductSales; | ترجع القيم من الحقل "ProductID"، وتقارن القيم في "ProductID" ب "PRO_XYZ1" وترجع النتائج في العمود ComparisonResult. "ProductID" يساوي "PRO_XYZ10"، وستقوم الدالة StrComp بإرجاع 0. إذا كانت "معرف المنتج" أقل من "PRO_XYZ10"، فسترجع الدالة StrComp -1. إذا كان "معرف المنتج" أكبر من "PRO_XYZ10"، فسترجع الدالة StrComp الرقم 1. إذا كانت قيمة "معرف المنتج" أو "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.