لغات البرمجة

قواعد البيانات

دليل المواقع التخصصية

خاص بسرعة الأداء

  • طباعة
التفاصيل
الزيارات: 3530

كود: 


Private Sub Command1_Click()


If f1 And f2 Then


Debug.Print "True"


End If


End Sub


ولكن الكود التالي (أسرع)
كود: 


If f1 Then


If f2 Then


Debug.Print "True"


End If


End If


ولكن لماذا ؟؟
في الكود الثاني قيمة f2 لن تختبر اذا كانت قيمة f1 تساوي false

http://www.arabteam2000-forum.com/

Share |

معلومات إضافية