(19-08-18, 09:21 PM)elgokr كتب :الله اكبرالان الصورة وضحت كاملاً
كان دائماً يعطى الاجمالى 6 و 3 حيث ليس لديك اى بيانات فى اى خلاياوالسبب يرجع هنا لانك مفعل الاضافة فى الداتا جريد فستجد بالنهاية الداتا جريدصف محصص لاضافة بيان جديد والتى تحتوى على قيمة وهمية لذلك كان يتم جلبها كا مجموع
ولتفادى ذلك دون تعطيل الاضافة تم تحويل السطر التالى
كود :
For i As Integer = 0 To DataGridView1.RowCount - 1
ليصبح السطر بهذا الشكل
كود :
For i As Integer = 0 To DataGridView1.RowCount - 2
ولتجنباً ايضاً لاى مشكلة اخرى تم تغيير كوط شرط التحقق الى التالى
كود :
REM الشرط هنا هو للتحقق ان يجب ان يكون الخلايا تحتوى على قيمة وليست فارغة أو تساوى 0
If TypeOf DataGridView1.Rows(i).Cells(ii).Value Is DBNull = False Then
count1 += 1
End If
وبما انك بتستخدم TextBox2 فى امور اخرىتم تغيير هذا السطر
كود :
REM نتائج اى عدد الخلايا التى تحتوى على قيمة فى خلايا الامتحانات
TextBox2.Text = count2
ليصبح
كود :
REM نتائج اى عدد الخلايا التى تحتوى على قيمة فى خلايا الامتحانات
TextBox11.Text = count2
السورس + برنامج للاختبار الكود مرفقبعد اتمام جميع التعديلات وبعض اللمساتفى عرض المجموع فى التصميم
وكما وضحت مسبقاً ان ما تطلبه بسيط جداًولكن كل ما يحتاج اليه هو التركيز فقط ويبدو بسبب الملل فى كثرة تجربة الاكواداصبحت فاقد الامل بان لا وجود لحل لاحظ التعديل فى السورس وبين الاكواد التى قمت بوضعها جميعا
تحياتى لكوتمنياتى لك التوفيق
كم انت عظيم يا استاذ العرب
و الله فرحت جدا جدا بهذه المساعدة التي عجز عنها الكثير من الاصدقاء
حفظك الله و ادامك لنا
شكرا شكرا
أنا الآن سعيد جدا
(19-08-18, 09:32 PM)kebboud كتب :(19-08-18, 09:21 PM)elgokr كتب :الله اكبرالان الصورة وضحت كاملاً
كان دائماً يعطى الاجمالى 6 و 3 حيث ليس لديك اى بيانات فى اى خلاياوالسبب يرجع هنا لانك مفعل الاضافة فى الداتا جريد فستجد بالنهاية الداتا جريدصف محصص لاضافة بيان جديد والتى تحتوى على قيمة وهمية لذلك كان يتم جلبها كا مجموع
ولتفادى ذلك دون تعطيل الاضافة تم تحويل السطر التالى
كود :
For i As Integer = 0 To DataGridView1.RowCount - 1
ليصبح السطر بهذا الشكل
كود :
For i As Integer = 0 To DataGridView1.RowCount - 2
ولتجنباً ايضاً لاى مشكلة اخرى تم تغيير كوط شرط التحقق الى التالى
كود :
REM الشرط هنا هو للتحقق ان يجب ان يكون الخلايا تحتوى على قيمة وليست فارغة أو تساوى 0
If TypeOf DataGridView1.Rows(i).Cells(ii).Value Is DBNull = False Then
count1 += 1
End If
وبما انك بتستخدم TextBox2 فى امور اخرىتم تغيير هذا السطر
كود :
REM نتائج اى عدد الخلايا التى تحتوى على قيمة فى خلايا الامتحانات
TextBox2.Text = count2
ليصبح
كود :
REM نتائج اى عدد الخلايا التى تحتوى على قيمة فى خلايا الامتحانات
TextBox11.Text = count2
السورس + برنامج للاختبار الكود مرفقبعد اتمام جميع التعديلات وبعض اللمساتفى عرض المجموع فى التصميم
وكما وضحت مسبقاً ان ما تطلبه بسيط جداًولكن كل ما يحتاج اليه هو التركيز فقط ويبدو بسبب الملل فى كثرة تجربة الاكواداصبحت فاقد الامل بان لا وجود لحل لاحظ التعديل فى السورس وبين الاكواد التى قمت بوضعها جميعا
تحياتى لكوتمنياتى لك التوفيق
كم انت عظيم يا استاذ العرب
و الله فرحت جدا جدا بهذه المساعدة التي عجز عنها الكثير من الاصدقاء
حفظك الله و ادامك لنا
شكرا شكرا
أنا الآن سعيد جدا
استاذي المحترم
اكتشفت الآن خطأ أفسد علي فرحتي.....
أريد منك يا استاذي عندما تضغظ على زر عرض الإجمالي و أنت واقف على أحد التلاميذ (يعني واضع مؤشر الماوس على احد التلاميذ) أن يحسب فقط لهذا التلميذ و لا يحسب لجميع التلاميذ ...واضح ؟؟؟
و شكرا