عرض مشاركة واحدة
  #1  
قديم 13-03-2012, 10:15 PM
hguhg hguhg غير متواجد حالياً
عضو نشيط
 
تاريخ التسجيل: Oct 2010
المشاركات: 204
معدل تقييم المستوى: 15
hguhg is on a distinguished road
Impp ارجو الرد سريعااااااااااااااااااااااااا

1)الخاصية ..............تقوم باعطاء قيمة لملصق الCheck box

لو سمحتوا ممكن حد يفهمنى السؤالين ده حلهم ازاى عشان انا بحاول افهمهم مش عارف

السؤال الاول:
sum=0
x=0
Do While X<5
Sum=sum +X
X=x+1
loop
Average=Sum/X
بعد تنفيذ التعليمات السابقة تكون:
1)قيمةXتساوى ...........(0-5-4)
2)قيمة averageتساوى ..................(2-2.5-3)

السؤال الثانى:
Dim I As Integer
Dim X As single =2.5
for I=1 to 10 step 3
X=x*2
Next
MsgBox(x)
بعد تنفيذ الاوامر السابقة:
1)تكون القيم التى سيأخذها العدادIهى ................
2)يكون عد مرات تنفيذ الجمله X=X*2 هى................
3)تكون قيمة المتغير xالتى سيعرضها مربع الرسالة هى..............


ارجو الرد وجزاكم الله كل خير