Imports System

Public Module Module1

    Public Sub Main()

        Dim bestName as string =  "Najeeb"

        COnsole.WriteLine("What is your name")

        Dim theirname as String = Console.ReadLine()

        If theirname= bestName

            Console.WriteLine("You are cool")

        ELse 

            Console.WriteLine("Nice to meet you")

        End If

    End Sub

End Module