[عمرو المطري]

السلام عليكم ورحمة الله وبركاته

اخواني الكرام قمت بكتابة كود IF  لكن يظهر لي خطأ عند التشغيل ولا ادري ماسبب هذا الخطأ

هذا هو الكود

كود :

Dim grd As Double = CDbl(txtGrade.Text)

       If grd >= 50 And grd <= 59 Then
           txtLetters.Text = "مقبول"

       ElseIf grd >= 60 And grd <= 69 = Then
           txtLetters.Text = "متوسط"

       ElseIf grd >= 70 And grd <= 79 = Then
           txtLetters.Text = "جيد"

       ElseIf grd >= 80 And grd <= 89 = Then
           txtLetters.Text = "جيد جداً"

       ElseIf grd >= 90 And grd <= 99 = Then
           txtLetters.Text = "ممتاز"
       Else
 txtLetters.Text = "راسب"

       End If

كما ترون قمت اولاً بتعريف متغير باسم grd

والخطأ الذي يظهر لي هو  Expression expected ويشير الى الأسطر التي مكتوب فيها Elseif