Imports System

Public Module Module1

    Public Sub Main()

        'Declare variable

        Dim name as string= ""

        'Get name from user

        Console.WriteLine(" Enter your Name:")

        Name = Console.ReadLine()

        'Check if name matches

        If Name= "Alex" Then

            Console.Write("Hello " + Name)

        End if

            Console.Writeline(" I don't know you!")

            If Name = "Peter" then 

                Console.WriteLine("your a random")

            Else If Name = "Patrick" Then 

                    Console.WriteLine("Lol")

                End if

    End Sub

End Module