اسمحلوي توضيح صغير
في المعادلة الاخيرة الكلمات اللي بالعربي والاقواس تكون بعد المكتوب بالانجليزي
Dim p As Double = 90
If p >= 90 Then
MessageBox.Show("ممتاز")
Else
If p >= 80 Then
MessageBox.Show("جيد جداً")
Else
If p >= 70 Then
MessageBox.Show("جيد")
Else
If p >= 60 Then
MessageBox.Show("مقبول")
Else
MessageBox.Show("راسف")
End If
End If
End If
End If
واسف على الخطء