Saber cual de tres números es el mayor VB.NET

    Sub Main()

        'Datos De Entrada

        Dim N1, N2, N3 As Long

        'Entrada De Datos Del Usuario

        Console.WriteLine("Digete El Primer Numero:")

        N1 = Console.ReadLine

        'Entrada De Datos Del Usuario

        Console.WriteLine("Digete El Segundo Numero:")

        N2 = Console.ReadLine

        'Entrada De Datos Del Usuario

        Console.WriteLine("Digete El Tercer Numero:")

        N3 = Console.ReadLine

        'Incio De La Estructura Condicional IF

        If N1 > N2 And N1 > N3 Then

            If N2 > N3 Then

                Console.WriteLine("El numero mayor es :" & N1)

                Console.WriteLine("El numero menor es :" & N3)

                Console.ReadLine()

            Else

                Console.WriteLine("El numero mayor es :" & N1)

                Console.WriteLine("El numero menor es :" & N2)

                Console.ReadLine()

            End If

        ElseIf N2 > N1 And N2 > N3 Then

            If N1 > N3 Then

                Console.WriteLine("El numero mayor es :" & N2)

                Console.WriteLine("El numero menor es :" & N3)

                Console.ReadLine()

            Else

                Console.WriteLine("El numero mayor es :" & N2)

                Console.WriteLine("El numero menor es :" & N1)

                Console.ReadLine()

            End If

        Else

            If N2 > N1 Then

                Console.WriteLine("El numero mayor es :" & N3)

                Console.WriteLine("El numero menor es :" & N1)

                Console.ReadLine()

            Else

                Console.WriteLine("El numero mayor es :" & N3)

                Console.WriteLine("El numero menor es :" & N2)

                Console.ReadLine()

            End If

        End If

    End Sub