VBScript code in QTP to display grade of a student depends on total marks.

Here, Grade is “A” when total marks >=800, Grade is “B” when total marks<800 and >=700, Grade is “C” when total marks <700 and >=600, Grade is “D” when total marks<600.

Option explicit

Dim totalmarks

totalmarks=inputbox("Enter Total Marks of student :")

If totalmarks >=800 Then

   msgbox("Grade is A")

   elseif totalmarks<800 and totalmarks>=700 Then

       msgbox("Grade is B")

       elseif totalmarks<700 and totalmarks>=600 Then

            msgbox("Grade is C")

            else

              msgbox("Grade is D")

End If