Imports System

Public Module Module1

    Public Sub Main()

        Dim Name As String

        Dim Age As Integer 

        Dim TVPrg As String 

        Console.Writeline("Please enter your name")

        Name = Console.Readline()

        Console.Writeline("What is your age?")

        Age = Console.Readline()

        Console.Writeline("What is your favourite TV program?")

        TVPrg = Console.Readline()

        Console.Writeline(Name & " " & Age) 'a " " string is added here so that the Name and the Age have a space in between.'

        Console.Writeline("Likes watching " & TVPrg)

        Console.Readline()

        'This program differs slightly from the program no. 1 in the arrangement of the display of data, as shown in the code above'

    End Sub 'By Ma. Raphaela 9A 17.03.2016'

End Module