Imports System

Public Module Module1

    Public Sub Main()

        'Create variable to store name

        Dim name as string = ""

        'Prompt user to enter name

        Console.WriteLine("Enter your name:")

        'Store user entry in name variable

        Name = Console.Readline()

        'Check If name matches

        If Name = "Jordan" Then 

            Console.WriteLine("Hello " + "Jordan ")

        Else

            Console.WriteLine(" I think you are fake")

        End if

    End Sub

End Module