1- عند تخزين القيمه (12345.768) فى متغيرين من النوع integer single ثم استرجاع قيمه كل متغير فان
ا- قيمه المتغير من النوع integer تكون ( 12345.768 - 12345 -12345.76 )
ب- قيمه المتغير من النوع single تكون( 12345.768 - 12345-12345.76 )
2- هى أداة تتيح للمستخدم مجموعه من البدائل واختيار اى عدد منها فى نفس الوقت
1- الاداة Radio Button 2- الاداة listbox
3- الاداة Checkbox 4- الاداه Group box
3- الخاصيه Interval للمؤقت Timer تحدد معدل وقوع الحدث Tick بالوحده الزمنيه
1- ثانيه 2- مللى ثانيه 3- دقيقه 4- ساعه
4- النكوين ..................... يستدعى التاريخ والوقت الخاصين بالنظام
1- Now 2-Date Time 3- time 4- كل ماسبق
ب- أكمل الاكواد التاليه لايجاد مجموع الاعداد الزوجيه من 2 الى10 باستخدام do ….while
, dim a as tnteger =2
sum as integer
do while ...a<11...
Sum =...sum + a.....
A=....a+2....
Loop
msgbox(sum)
السؤال الثاني:
ضع علامة الصواب أمام العبارة الصحيحة او علامه الخطأ امام العبارة الخاطئة ؟
1-عند استخدام الامر For…next فان عدد مرات التكرار التى تتم تكون غير معروفه. خطأ
2- المخازن التى لاتتغير قيمها أثناء تشغيل البرنامج يطلق المتغيرات. خطأ
3-الاداة Radio Button تتيح للمستخدم مجموعه من البدائل لاختيار أكثر من بديل فى نفس الوقت. خطأ
4- فى الامر Loop …..do ….while عندما يكون ناتج الشرط True يتم تنفيذ الاوامر التى الشرط. صح
ب- اكتب الاكواد اللازمه لتنفيذ الأتي :
1-اضافه الاسم (الدقهليه) داخل صندوق الاداه Listbox1
me.listbox1.insert(الدقهلية
2- حذف العنصر الثالث فى صندوق الاداه Listbox
me.listbox2.remove)3)
ج- اكتب ناتج تنفيذ العمليات الحسابيه التاليه
1- (3+2^2)*3/7
الناتج 3
2- 3+2^2*3/6
الناتج 5
3- 9 mod 7\3
الناتج المفروض صفر بس أنا عملت 2
السؤال الثالث
أكمل الجمل الاتيه
1- المتغير الذى يأخذ القيمه True or false)) يكون من النوع ...BOOLEAN.....
2- حجم الذاكرة التى يحتاجها المتغير من النوع Short هو .....2...... بايت والمتغير Double هو ......16.... بايت ويتم حجز 8 بايت للمتغير من النوع .....INTEGER... والذى يأخذ أعداد صحيحه فقط.
3-...أوامر التكرار..... هى أوامر تتحكم فى اعادة تنفيذ عمل معين أو مجموعه من الاوامر حتى يتحقق شرط معين.
4- ..TIMER.. هو ساعة توقيت غير مرئية تتيح لك التعامل مع ساعة الحاسب من داخل البرامج التي يتم تنفيذها
ب- أقرأ التعليمات الاتيه ثم أجب عن الاسئله التاليه
Dim First as integer =20 , Second as integer=40
Dim Third as integer = First + Second
Dim Total as integer
If Third <=50 Then
Total= First + Second+ Third
Else
First=30
Second=50
Total= First + Second+ Third
End If
السؤال مش مكتوب لكن أنا متأكدة منه
هى ديه إجاباتى