Imports System

​

Public Module Module1

​

    Public Sub Main()

        Dim intNumber as Integer

        Console.Writeline("Enter number")

        intNumber = Console.Readline()

    End Sub

End Module

​