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 age")

        intAge = Console.ReadLine ()

        Console.WriteLine ("enter you date of birth")

        dtmDOB = Console.ReadLine ()

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

        End Sub

End Module