Escreva uma função VB.NET que recebe três números inteiros e retorna o menor deles - Desafio de Programação Resolvido em VB.NET

Informe o primeiro número: 8
Informe o segundo número: 10
Informe o terceiro número: 7
O menor número é: 7

Imports System

' Algoritmo C# para ler três numeros e informar qual deles
' é o menor

Module Program
  ' função que recebe três números e retorna o menor deles
  Function Menor(a As Integer, b As Integer, c As Integer) As Integer
    Return Math.Min(Math.Min(a, b), c)
  End Function

  ' função principal do programa VB.NET 
  Sub Main(args As String())
    ' vamos pedir para o usuário informar três
    ' números inteiros
    Console.Write("Informe o primeiro número: ")
    Dim n1 As Integer = Int32.Parse(Console.ReadLine())
    Console.Write("Informe o segundo número: ")
    Dim n2 As Integer = Int32.Parse(Console.ReadLine())
    Console.Write("Informe o terceiro número: ")
    Dim n3 As Integer = Int32.Parse(Console.ReadLine())

    ' agora vamos calcular o menor número
    Dim menorNumero As Integer = Menor(n1, n2, n3)

    ' e mostramos o resultado
    Console.WriteLine("O menor número é: " & menorNumero)

    Console.WriteLine(vbCrLf & "Pressione qualquer tecla para sair...")
    ' pausa o programa
    Console.ReadKey()
  End Sub
End Module