اقتباس:
المشاركة الأصلية كتبت بواسطة ابو محمد 2
عدد مرات التكرار 3 وليس 6 مرات حيث يتغير العداد بقيمة الخطوة الثانية وكذلك قيمة خطوة الزيادة وتكون ( 1 , 3 ، 5 ) وهذا كود يوضح ذلك
Dim z, n AsInteger
For z = 0 To 5
MsgBox(z)
z = z + 1
Me.ListBox1.Items.Add(z)
Next
n = z
MsgBox(n)
|
معذرة أبو محمد
حضرتك يجوز تكون قرأت خطأ
من أين أتيت بأن بمقدار الزيادة 3 والمعلوم ان مقدار الزيادة هو الرقم الذي يلي كلمة Step وطالما ان هذه الكلمة لم تكتب كما في المثال For Z = 0 To 5 إذن يفهم من ذلك ان مقدار الزيادة بمقدار واحد ( 1 )
وعلى هذا الأساس يكون التكرار 6 مرات كما وضحتها سابقاً .
والمثال اللى حضرتك استشهدت بيه ستجد ان مقدار الزيادة هو واحد أيضاً ( 1 ) لأن الزيادة بتظهر في السطر الرابع
Z = Z + 1 أي قم بزيادة قيمة Z بمقدار 1 فمن أين أتيت حضرتك بالزيادة بمقدار 3 .