Imports System

Public Module Module1

    Dim number as integer= 0

    Public Sub Main()

        Console.Writeline("Enter number")

        Console.Readline()

        IF number/2=0

            Console.Writeline("number is even")

            Console.Readline()

            else

            Console.Writeline("number is not even")

            Console.Readline()

        end if

​

    End Sub

End Module