Imports System

Public Module Module1

    Public Sub Main()

        Dim housenum as integer

        Dim streetname as string

        dim town as string

        Console.WriteLine("What is your house number?")

        housenum=Console.readline()

        Console.WriteLine("What is the name of your street?")

        streetname=Console.readline()

        Console.WriteLine("What town do you live?")

        town=Console.readline()

        Console.writeline(housenum & "," & streetname & "," &town)

        console.ReadLine()

    End Sub

End Module