Imports System

Public Module Module1

    Public Sub Main()

        'Estas son las variables de mi programa...

        Dim datoentrada As Integer = 0 

        Dim resto As Integer = 0 

        Console.WriteLine("1) Por favor ingrese un número para saber si es par o impar ")

        datoentrada = Integer.Parse(Console.ReadLine())

        resto = datoentrada  Mod 2 

        If   resto=0 Then 

            Console.WriteLine("El dato ingresado es par:")

        Else

            Console.WriteLine("El dato ingresado es impar")

        End If 

    End Sub

End Module