Module Module1 Sub Main() 'This is a comment: 'Declare the variable "myName" of type string Dim myName As String 'prompt the user to enter his/her name Console.WriteLine("Please enter your name") 'The name entered will be assigned to the variable "myName" myName = Console.ReadLine() 'Displaye "Hello myName" Console.WriteLine("Hello {0}", myName) 'vbCrLf: Display a new line Console.WriteLine(vbCrLf + "Please Press enter to Exit") 'Prevents the program from exiting immediately when the code has 'finished executing Console.ReadKey() End Sub End Module