Nilai = Val(Text1)
If Nilai < 41 Then
NilaiHuruf = "E"
Else
If Nilai < 56 Then
NilaiHuruf = "D"
Else
If Nilai < 66 Then
NilaiHuruf = "C"
Else
If Nilai < 81 Then
NilaiHuruf = "B"
Else
NilaiHuruf = "A"
End If
End If
End If
End If