Switch Ejercicio VB.Net - Curso de Programación Visual Basic

Imports System
Public Class Exercise44
    Public Shared Sub Main()
        Dim number As Integer
        Console.Write("Number? ")
        number = Convert.ToInt32(Console.ReadLine())

        If (number = 9) OrElse (number = 10) Then
            Console.WriteLine("Sobresaliente")
        ElseIf (number = 7) OrElse (number = 8) Then
            Console.WriteLine("Notable")
        ElseIf number = 6 Then
            Console.WriteLine("Bien")
        ElseIf number = 5 Then
            Console.WriteLine("Aprobado")
        ElseIf (number >= 0) AndAlso (number <= 4) Then
            Console.WriteLine("Suspenso")
        Else
            Console.WriteLine("No válido")
        End If

        Select Case number
            Case 0, 1, 2, 3, 4
                Console.WriteLine("Suspenso")
            Case 5
                Console.WriteLine("Aprobado")
            Case 6
                Console.WriteLine("Bien")
            Case 7
                GoTo _Select0_Case8
            Case 8
_Select0_Case8:
                Console.WriteLine("Notable")
            Case 9
                Console.WriteLine("Bajo, pero... ")
                GoTo _Select0_Case10
            Case 10
_Select0_Case10:
                Console.WriteLine("Sobresaliente")
            Case Else
                Console.WriteLine("Nota no válida")
        End Select
    End Sub
End Class