I got problem when i was finding grade of student the code is below:
Private Sub gradeObtained_GotFocus()
If ([marksPercentage] >= 80 & [marksPercentage] < 100) Then
[marksPercentage] = "A+"
End If
If ([marksPercentage] >= 70 & [marksPercentage] < 80) Then
[marksPercentage] = "A"
End If
If ([marksPercentage] >= 60 & [marksPercentage] < 70) Then
[marksPercentage] = "B"
End If
If ([marksPercentage] >= 50 & [marksPercentage] < 60) Then
[marksPercentage] = "C"
End If
If ([marksPercentage] >= 40 & [marksPercentage] < 40) Then
[marksPercentage] = "D"
End If
End Sub