Numero par o impar VB Aplicación de Consola

Este programa se desarrollara una aplicación la cual determinara si un número es par o impar; cuanta solo con una validación la cual no permite el ingreso del 0 o menores.

Procedimiento

1. Creamos un proyecto elegimos Aplicacion de Consola.

2. Luego añadimos el codigo dentro de la sentencia Sub Main().

Module Module1

    Sub Main()

        Dim num As Single

        Console.Write("Ingrese número:")
        num = Single.Parse(Console.ReadLine())

        While num <= 0
            Console.Write("Ingrese número mayor a cero:")
            num = Single.Parse(Console.ReadLine())
            Console.Clear()
        End While

        If num Mod 2 = 0 Then
            Console.Write("El numero {0} es par", num)
        Else
            Console.Write("El numero {0} es impar", num)
        End If

        Console.ReadKey()
    End Sub

End Module