+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4)
+--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18)
+--- الموضوع : طلب تعديل في كود احتساب المعدل العام (/showthread.php?tid=23801)
طلب تعديل في كود احتساب المعدل العام - مصمم هاوي - 11-02-18
هل يمكن التعديل في كود احتساب المعدل
كود :
' اوجد المعدل العام بالقسمة على 13
Y = Val(Text51.Text)
Y = Y / 13
Text32.Text = Round(Y, ("2"))
Text32.Text = Format(Text32.Text, "0.00")
Text8(0).Text = "ناجح"حيث Text51 تكست اظهار تقدير الطالب
حيث Text32 تكست اظهار المعدل العام
عدد المواد المطلوب احتساب المعدل = 13 مادة
وعدد المواد الآخرى لبقية الصفوف = 12 مادة