[بدر إشتية]

شباب اذا ممكن انا محتاج الفكرة ومثال على ادخال علامات طلاب المدرسة وطبااعة الشهادات

واي مثال يخص برنامج ادارة المدرسة يرجى إفادتي به

[الدريساوي]

السلام عليكم 

انشاء الله في حالة انجاز العمل  البطاقة المدرسية سوف ارفعه للجميع وهذه صورة للبرنامج 

[احمد عبد الحكيم]

اخى تقريبا هذا الفيديو يفيدك
https://www.youtube.com/watch?v=IfBNDzVpeX4

وممكن هذا الكود ايضا يفيدك
On Error GoTo a
Dim a, b, c, d As Integer
a = Text1.Text
b = Text2.Text
c = Text3.Text
d = Text4.Text

If a + b + c + d >= 90 Then Text5.Text = "ممتاز"
If a + b + c + d >= 80 Then Text5.Text = "جـيـد جــداً"
If a + b + c + d >= 70 Then Text5.Text = "جـــيـــد"
If a + b + c + d >= 50 Then Text5.Text = "مقبول"
If a + b + c + d >= 90 Then Text5.Text = "رااااسب"
End If
Exit Sub
a:
MsgBox ("عفوا ، لم تقم بكتابة أي أرقام. الرجاء إعادة المحاولة"), vbCritical, "خــطــأ"
End Sub