Option Strict On

Imports System

Imports System.Linq

Public Module Module1

    Public Sub Main()

        'Declare a collection to store names

        Dim names() As String = {"David", "Michael", "Stephen"}

​

        'Print the first value from the collection

        Console.WriteLine(names.First()) 'names.First() = "David"

​

        'Print the first or default value from the collection that matches what the user input

        Console.Write("Name: ")

        Dim input As String = Console.ReadLine()

        Console.WriteLine((From name As String In names Where name = name).FirstOrDefault())

    End Sub

End Module