Imports System.Runtime.Remoting.Services

Module Module1

    Sub Main()
        Dim score As Integer
        Dim grade As String

        Console.Write("Enter ur score = ")
        score = Console.ReadLine()

        If score >= 0 And score <= 100 Then

            If score >= 80 Then
                grade = "Xellent"
            ElseIf score >= 60 Then
                grade = "u did goot"
            Else
                grade = "better luck next time"
            End If

        Else
            grade = "go succ yo mum"
        End If

        Console.WriteLine(grade)
        Console.ReadKey()

        MsgBox("congrats neverthel,ess")


    End Sub

End Module