03-06-16, 03:07 PM
03-06-16, 04:06 PM
استخدم Timer
03-06-16, 04:35 PM
فين اخي انا عاوز الكود
03-06-16, 05:22 PM
PHP كود :
Dim sw As Stopwatch = New Stopwatch
Dim timeline As TimeSpan = New TimeSpan(0, 0, 0, 10, 0)
sw.Start()
While sw.Elapsed.TotalMilliseconds <= timeline.Seconds
' اكتب الكود الذي تريد تنفيذه هنا
End While
' الأن تقوم بإيقاف الساعة
sw.Stop()
' هذا السطر للتوضيح فقط والهدف منه اظهار الفترة الزمنية بعد انتهاء تنفيذ الكود
Me.Text = sw.ElapsedMilliseconds
أو لمزيد من الدقة يمكنك أن تكتب الكود بالشكل التالي
PHP كود :
Dim sw As Stopwatch = New Stopwatch
Dim timeline As TimeSpan = New TimeSpan(0, 0, 0, 10, 0)
sw.Start()
Do While sw.Elapsed.TotalMilliseconds <= timeline.Seconds
' do nothing
Loop
' الأن تقوم بإيقاف الساعة
sw.Stop()
' اكتب الكود الذي تريد تنفيذه هنا
' هذا السطر للتوضيح فقط والهدف منه اظهار الفترة الزمنية بعد انتهاء تنفيذ الكود
Me.Text = sw.ElapsedMilliseconds
05-06-16, 03:04 PM
للمبتدئين
ضع تايمر ثم ادخل على الخصائص ثم اكتب في خانه Interval
10000 لان كل 1000 = ثانيه
ضع تايمر ثم ادخل على الخصائص ثم اكتب في خانه Interval
10000 لان كل 1000 = ثانيه