استفسارات بخصوص القواعد الاساسية

[وسام العمر]

السلام عليكم

كيف اطبق قاعدة Select Case على هذا السؤال وكذلك قاعده For

قم بصياغة حل لايجاد مجموع درجات طالب في 15 مادة دراسية .؟؟؟ السؤال موجود في الكتاب ص 19


من خلال مخطط الانسيـــاب.؟؟

اريد ان اشرحها بطريقة عملية مقارنة بين الاثنيــن بحيث يتضح للطالبة كيف استفدنا من المخطط في صنع البرنامج .؟ <<<<< احد فهم حاجة ولا انا



....................


وارجوتزويدي بطريقة مبسطه او امثله تقريبية لشرح قاعدة Select Case ..


في انتظــــــــاركم

[متميزه]

Select Case اختباريه لاحتمالات عديده
وفي هذا المثال اختبار واحد وهو عدد المواد = 15
تستخدمينها مثل جملة IF

[متميزه]

Private Sub Command1_Click()
Dim I As Integer, M As Single, D As Single
For I = 1 To 15
D = InputBox("ادخل درجات الطالب")
M = M + D
Next I
Text2.Text = M
End Sub