Module Module1

    Sub Main()
        Dim myName As String
        Console.WriteLine("Please enter your name")
        myName = Console.ReadLine()
        Console.WriteLine("Hello {0}", myName)
        Console.WriteLine(vbCrLf + "Please Press any Key to Exit")
        'Prevents the program from exiting immediately when the code has 
        'finished executing
        Console.ReadKey()
    End Sub
End Module