[محمدبلبوله]

اذكر قيمة x بعد مرور ثلاث ثوانى بفرض أن قيمة الخاصية interval للمؤقت timer1 هي 1000

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

[IMG]file:///C:/DOCUME%7E1/Owner/LOCALS%7E1/Temp/msohtml1/01/clip_image001.gif[/IMG] Static x As Integer

x = x + 1

MsgBox(x)

End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick

[IMG]file:///C:/DOCUME%7E1/Owner/LOCALS%7E1/Temp/msohtml1/01/clip_image002.gif[/IMG] Dim x As Integer

x = x + 1

MsgBox(x)

End Sub

هي الاجابه ح تكون

الاوله : X=3 , الثانيه : X=1



والسبب
* تستخدم الكلمه Static للاعلان عن متغير خاص , حيث ان المتغير سيحتفظ بقيمته طول فتره تشغيل البرنامج
ولن يتم إعطاؤه قيمه ابتدائيه عند كل مره يتم فيها استدعاء البرنامج الفرعي .
بس مش فااااااااااااااااااااهم حاجه
مين يوضح ليه ؟؟؟؟؟؟؟؟