+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+---- قسم : قسم أسئلة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=28)
+---- الموضوع : [سؤال] ايهما افضل قاعده if او قاعده Select (/showthread.php?tid=37635)
ايهما افضل قاعده if او قاعده Select - العبادي 2 - 29-01-21
ايهما افضل قاعده if او قاعده Select
مثال
نفرض لدينا اربع مجموعات
A,B,C,D
تكون المجموعهA هي الاكبر
في حاله انها اكبر من كل المجموعات
او انها تساوى كل المجموعات
A=B and A=C and A=D
او A اكبر منB و A اكبر منC و A اكبر منC
+++++++++++++++++++++++
تكون المجموعهB هي الاكبر
في حال انها اكبر من A
و اكبر من باقي المجموعات
او تساوي المجموعات الباقيه
بمعنى B=C and B=D
+++++++++++++++++--------------
تكون المجموعهC هي الاكبر
في حال انها اكبر منA واكبر منB
و تساوى باقي المجموعات او اكبر من باقي المجموعات
بمعنى C اكبر من A واكبر من B
C=D
++++++++++++
تكون D الاكبر حاله انها اكبر من كل المجموعات السابقة
RE: ايهما افضل قاعده if او قاعده Select - سعود - 29-01-21
حسب معلوماتي لا يوجد فرق.
لكن ان كان القصد الرقم الاكبر فيمكنك استخدام الطريقة هذه
RE: ايهما افضل قاعده if او قاعده Select - cofie - 29-01-21
جرب هذا الكود
PHP كود :
If D > A And D > B And D > C Then
MsgBox "D"
ElseIf C > A And C > B And C >= D Then
MsgBox "C"
ElseIf B > A And B >= C And B >= D Then
MsgBox "B"
ElseIf A >= B And A >= C And A >= D Then
MsgBox "A"
End If
RE: ايهما افضل قاعده if او قاعده Select - العبادي 2 - 29-01-21
مشكورين
بارك الله فيكم جميعا