Imports System

Public Module Module1

    Public Sub Main()

        Dim strName as string

        Dim  intAge as integer

        Dim dtmDOB as Date

        Console.WriteLine("enter your name")

        strName = Console.ReadLine()

        Console.writeline("enter your age")

        intAge = Console.ReadLine()

        Console.WriteLine("Enter your DOB")

        dtmDOB = Console.ReadLine()

​

        Console.WriteLine("Your details: " * strName & ", " & intAge & ", " & dtmDOB)

    End Sub

End Module