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

كود:


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 |

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