Imports System

Public Module Module1

    Public Sub Main()

        Dim Name As Integer

        Console.WriteLine("My name is Bot, What is Your Name?:")

        Console.ReadLine = Name

        Console. WriteLine("Hello" & Name & " How are You?")

    End Sub

End Module