[ تمت الإجابة ] استخراج التقدير العام

انا عندي شهادة علامات لكل طالب واريد ان اظهر تقدير الطالب النهائي مثلا ( ممتاز و جيد جدا و جيد ومقبول وتحت المعدل .) واستخرج هذا التقدير من النسبة المحسوبة في التقرير

اللي عملتو اني

وضعت مربع نص واستخدمات الفيجوال بسيك داخل الاكسس لكن لا يظهر اي شيء بالتقيرير

Private Sub Text203_AfterUpdate()

If Me.GPA = 100 Or Me.GPA >= 90 Then

Me.Text203.Text = "ممتاز"

ElseIf Me.GPA < 90 Or Me.GPA >= 80 Then

Me.Text203.Text = "جيد جدا"

ElseIf Me.GPA < 80 Or Me.GPA >= 70 Then

Me.Text203 = "جيد"

ElseIf Me.GPA < 70 Or Me.GPA >= 60 Then

Me.Text203.Text = "مقبول"

Else

Me.Text203.Text = "تحت المعدل"

End If

End Sub

وجربت اني استخدمت الدالة IIf في control source لكن لم يقبلها لانها معقدة ماذا تتوقعون الخطأ