شكرا على البرنامج بس انامش عارف ان االمجموع من كام بس انا هفترد ان المجموع من 100 هتكتب الكود دا عشان يعدل على التقدير
كود PHP:
Dim x As Short
x = Short.Parse(Me.TextBox1.Text)
If x > 90 Or x = 90 Then
MsgBox("ممتاز")
ElseIf x > 80 Or x = 80 Then
MsgBox("جيد جدا")
ElseIf x > 70 Or x = 70 Then
MsgBox("جيد")
ElseIf x > 60 Or x = 60 Then
MsgBox("متوسط")
ElseIf x > 50 Or x = 50 Then
MsgBox("مقبول")
Else
MsgBox("راسب")
End If
ابقا غير الارقام بقا او ابقا هتلى ان المجموع من كام وانا اعملهالك