Option Strict On

Imports System

Public Module Module1

    Public Sub Main()

        Dim grade As Integer = 96

        If grade > 100 Then

            Console.WriteLine("You cannot have a grade greater than 100.")

        ElseIf grade = 100 Then

            Console.WriteLine("You have a perfect 100, A+.")

        ElseIf grade >= 90 Then

            Console.WriteLine("You have an A.")

        ElseIf grade >= 80 Then

            Console.WriteLine("You have a B.")

        ElseIf grade >= 70 Then

            Console.WriteLine("You have a C.")

        ElseIf grade >= 60 Then

            Console.WriteLine("You have a D.")

        ElseIf grade > 0 Then

            Console.WriteLine("You have an F.")

        Else

            Console.WriteLine("You cannot score less than a 0.")

        End If

        Console.ReadLine()

    End Sub

End Module