المصفوفات

المحاضرة الرابعة عشر:المصفوفات

التعامل مع المصفوفات بداخل شفرة البرنامج
بما إن المصفوفة هي مجموعة من البيانات من نفس النوع لذلك من الضروري جداً عندما نتعامل معها إن نستخدم أحدى دورات التكرار ( العبارات التكرارية ) وان أفضل العبارات التكرارية الملائمة للتعامل مع المصفوفات هي عبارة for…next حيث إنها عبارة تكرارية غير مشروطة كذلك فأن فيها عداد قيمة الأولية والنهائية معلومتان وهذا هو حال المصفوفة حيث إن القيمة الأولية للعداد تمثل بداية الفهرسة للمصفوفة ( الحد الأدنى للمصفوفة) والقيمة النهائية للعداد تمثل نهاية الفهرسة للمصفوفة (الحد الأخير لها ) .
وسوف يتضح فيما يأتي ماتم شرحه بخصوص المصفوفات الاحاديه والثنائية وذلك في كل من المشاريع الاتية :-
امثلة توضيحية حول المصفوفات:

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

1- تصميم واجهة المشروع








إعداد خصائص الكيان
الكيان الخاصية الإعداد
Command1 Caption Test
Command2 Caption Quit

إعداد وكتابة شفرات المشروع
1-شفرة الكيان command2 الذي اسمه Quit هي:
end

2-شفرة الكيان command1 الذي اسمه Test :
Dim i as integer ,x as integer ,y as integer
Dim title as string
dim degree(5) as integer
For i=0 to 4
title=”degree”&i
degree(i) =inputbox (“enter the degree “,title)
Next i
X=degree(0)
For i=1 to 4
If x>degree(i) then
Msgbox (“ the higest degree is “& x)