مقارنة VBA Operaتورس: لا يساوي، Less من أو يساوي

مقارنة VBA Operaالاختصاصات

هذه هي العوامل المستخدمة لمقارنة القيم. تشمل عوامل المقارنة يساوي، وأقل من، وأكبر من، ولا يساوي

تُستخدم عوامل المقارنة لمقارنة القيم لأغراض التحقق. لنفترض أنك تقوم بتطوير تطبيق نقطة بيع بسيط. في هذا التطبيق، تريد التحقق من صحة القيم المدخلة قبل النشر. في مثل هذه الحالات، يمكنك استخدام عوامل المقارنة. سيتحقق هذا العامل من الأرقام السالبة أو للتأكد من أن المبلغ المدفوع لا يتجاوز المبلغ المطلوب. تكون عوامل المقارنة مفيدة في مثل هذه المواقف.

يسرد الجدول التالي عوامل المقارنة المحددة في VBA.

المُشغل الوصف
= متساوي: يتحقق مما إذا كانت قيمتان متساويتين. كما يستخدم أيضًا كعامل تعيين
< Less من: يستخدم هذا المشغل لطرح الأرقام
> أكبر من: يستخدم هذا العامل لضرب الأرقام
<> لا يساوي: يستخدم هذا المشغل لقسمة الأرقام
<= Less من أو يساوي:
>= أكبر من أو يساوي:

مقارنة VBA Operaتورس مع المثال

يوضح الجدول التالي مقارنة Excel VBA Operaتورس مع الأمثلة والإخراج.

S / N المُشغل مثال الناتج
1 = إذا س = ض ثم يُرجع صحيحًا إذا كانا متساويين، وإلا يُرجع خطأ
2 < إذا س <ض ثم يُرجع صحيحًا إذا كانت x أقل من z، وإلا فإنه يُرجع خطأ
3 > إذا س > ض ثم يُرجع صحيحًا إذا كانت x أكبر من z، وإلا فإنه يُرجع خطأ
4 <> إذا س <> ض ثم يُرجع صحيحًا إذا لم يكنا متساويين، وإلا يُرجع خطأ
5 <= إذا س <= ض ثم يتم إرجاع صحيح إذا كانت x أقل من أو تساوي z، وإلا فإنها تُرجع خطأ
6 >= إذا س >= ثم يتم إرجاع صحيح إذا كانت x أكبر من أو تساوي z، وإلا فإنها تُرجع خطأ

مثال كود المصدر

المقارنة المتساوية Operaتور

    If 2 = 1 Then
            MsgBox "True", vbOKOnly, "Equal Operator"
        Else
            MsgBox "False", vbOKOnly, "Equal Operator"
    End If

هنا،

  • "إذا كان 2 = 1 إذن... وإلا... انتهى إذا" يستخدم عبارة if لتقييم الشرط "2 = 1"
  • "رسالةBox... " هي وظيفة مدمجة تعرض مربع رسالة.
    • سيتم عرض المعلمة الأولى "True" أو "False" في مربع الرسالة. في مثالنا، 2 لا يساوي 1، وبالتالي، سيتم عرض "false" في مربع الرسالة.
    • المعلمة الثانية “vbOKOnly” هي الزر الذي يظهر في مربع الرسالة
    • المعلمة الثالثة "متساوية". Opera"tor" هو عنوان صندوق الرسالة.

يؤدي تنفيذ الكود أعلاه إلى النتائج التالية

ايكوال Operaتور

قم بتنزيل كود Excel أعلاه