Imports System

​

Public Module Module1

​

    Public Sub Main()

        Dim intNumber as Integer

        Console.WriteLine("Enter Number")

        intNumber = Console.ReadLine()

    End Sub

End Module

​