منتدى خاص بمدرسة الشارقة واساتذة المدرسة وطلابها
 
الرئيسيةالبوابةس .و .جبحـثالأعضاءالتسجيلدخول
المواضيع الأخيرة
» تصميم مواقع انترنت
الأربعاء نوفمبر 30, 2011 1:39 am من طرف جانا

» تحميل هوتميل Hotmail Messenger
الخميس أغسطس 18, 2011 2:33 am من طرف جانا

» برنامج ياهو ماسنجر ظريف موت
الخميس أغسطس 18, 2011 2:22 am من طرف جانا

» برنامج سكاي بي المتميز
الثلاثاء أغسطس 09, 2011 7:24 am من طرف جانا

» برنامج حجب المواقع الأباحية مفيش منه
الأربعاء يوليو 06, 2011 2:18 am من طرف جانا

» برنامج حماية للكمبيوتر من الانترنت بديع
الأربعاء يوليو 06, 2011 2:11 am من طرف جانا

» برنامج ازالة البرامج بشكل نهائى من الجهاذ الشامل
الثلاثاء مايو 24, 2011 3:10 am من طرف جانا

» برنامج تحميل افلام من النت برنامج ميجا ابلود الروعه
الثلاثاء مايو 24, 2011 3:03 am من طرف جانا

» برنامج تسجيل الشاشه فيديو المتألق
الخميس أبريل 14, 2011 4:01 am من طرف جانا

» بنامج لتصوير سطح المكتب المذهل
الخميس أبريل 14, 2011 3:49 am من طرف جانا

» بنامج لتصوير سطح المكتب المذهل
الخميس أبريل 14, 2011 3:49 am من طرف جانا

» برنامج فلاش بلير الواضح
الإثنين أبريل 11, 2011 5:03 am من طرف جانا

» برنامج الياهو ماسنجر 11 الواضح
الإثنين أبريل 11, 2011 4:44 am من طرف جانا

» برنامج لعرض تويتر على سطح المكتب المتطور
الأحد أبريل 10, 2011 2:35 am من طرف جانا

» برنامج الدردشه بالصوت والصوره الهايل
الأحد أبريل 10, 2011 2:23 am من طرف جانا


شاطر | 
 

 حلقة التكرار For

اذهب الى الأسفل 
كاتب الموضوعرسالة
المدير العام
أ.نهاد أبومطر
avatar

عدد المساهمات : 58
تاريخ التسجيل : 23/09/2009

مُساهمةموضوع: حلقة التكرار For   الثلاثاء ديسمبر 29, 2009 11:34 pm

حلقة التكرار For



حلقة التكرار For مشابهة تقريباًللحلقة السابقة Do

تستعمل لتكرار عمل معين بعدد محدد.

الشكل العام للتعليمة:


For a= القيمة الأولى To القيمةالثانية

الحدث (التعليمة)

Next


ملاحظة( a) مجرد وسيط يمكنك تغيره










مثال سريعللجملة البسيطة :


For a = 0 To 5
MsgBox "
مثال", vbMsgBoxRight, a
Next




في المثال السابق حددناالقيمة الأولى وهي 0 أي قيمة a

ثم حددنا القيمة الثانيةوهي 5 .

لذلك سوف يتم عرض الرسالةبقيمة a أي خمس مرات. ودائما تنتهي جملة التكرار ب: Next



ملاحظة: لجملة التكرار For نوعان النوع السابق هو الجملة البسيطة. والآن نأتي إلىالجملة المركبة:

الجملة المركبة تحويالحلقة الداخلية والحلقة الخارجية . أي حلقة For داخل حلقة For



مثال سريعللجملة المركبة:


For s = 0 To 1

'بداية الحلقة الداخليةFor a = 0 To 2
Print "s="; s, "a="; a
Next
'نهاية الحلقةالداخلية
Print ""
Next






مثال آخرللجملة For


ضع الكود التالي في أداة التوقيت Timerولاتنسى خاصية Interval=100

Dim h
Dim w
h = Me.Height / 2
w = Me.Width / 2
For i = 1 To w
Me.Circle (h, w), i, RGB(Rnd * 100, Rnd * 200, Rnd * 90)
Next






ومن هذانجد أن حلقة التكرار For هي أبسط وأسهل من جملة التكرارالسابقة Do وأي برنامج بسيط يحتاج لأي جملة إما شرطية أوحلقة تكرار.

وبهذا نكونقد إنتهينا من الجمل وحلقات التكرار . أرجو أن أكون قد حققتالفائدة.
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو
 
حلقة التكرار For
الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
منتديات مدرسة الشارقة الثانوية :: المنتديات التعليمية للمواد :: منتديات الصف العاشر :: منتدي تكنولوجيا المعلومات-
انتقل الى: