Imports System

​

Public Module Module1

​

    Public Sub Main()

        Dim strname as String

        Dim intAge as String

        Dim dtmDOB as String

        Console.WriteLine("Enter your first name")

        strName = Console.ReadLine()

        Console.WriteLine("Enter your age")

        intAge = Console.ReadLine()

        Console.WriteLine("Enter your date of birth")

        dtmDOB = Console.ReadLine()

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

    End Sub

End Module

​