ارجو الحل الله يسعدكم

[ليالي نجران]

السلام عليكم
حبيت اسألكم عندي مشكلة في تطبيق برنامج حساب درجات و تقدير طالب
تتنفذ معي الشاشة ادخل اسم الطالبة و الدرجات كمان بس لما اضغط على زر اعرض التقدير يطلع لي المشكلة في السطر التالي
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
For I = 0 To 3 Step 1
A(I) = InputBox(" ادخل درجة الطالب في مادة الحاسب على التوالي اعمال السنة ،الحضور و الغياب ،الاختبار الفصلي ،النهائي ")
Next
End Sub

يطلع لي مشكلة ذي مكتوب
Conversion from string "2،3،4،4" to type 'Integer' is not valid.

[طالب المزيد]

لو تضع البرنامج كامل يفضل

عشان نقدر نشوف وين الخلل

بس أعتقد بأنها مشكلة في نوع المتغيرات !!

[حسن مجهلي]

السلام عليكم ورحمة الله وبركاته
البرنامج السليم الخاص بحساب التقدير
للتحميل من المرفقات
ومن الرابط التالي
http://www.gulfup.com/?6OUpJB
والبرنامج يعمل كما توضح الصورة التالية
http://im86.gulfup.com/OV0Ehx.jpg

[SHO0OSHO0O]

غير هذا السطر

A(I) = InputBox("أدخل درجة الطالب في مادة الحاسب الآلي (أعمال السنة ، الحضور والغياب،الاختبار الفصلي ، الاختبار النهائي) على التوالي")


الى هدا
A(I) = CInt(InputBox("أدخل درجة الطالب في مادة الحاسب الآلي (أعمال السنة ، الحضور والغياب،الاختبار الفصلي ، الاختبار النهائي) على التوالي"))



يعني راح تستخدم دالة التحويل من نص إلى عدد صحيح
CINT

[ليالي نجران]

لا الحمدالله ضبط معي ...صارت المشكلة اني ادخل الدرجات كل مرة في نافذة و لس مع بعضها البعض \