Imports System

Imports System.Linq

Imports System.Collections.Generic

Public Module Module1

    Public Sub Main()

        Dim Reasons As New List(Of String)

        Reasons.Add("test")

        Reasons.Add("test2")            

        Console.Write(Reasons.Find(Function(x) x = "test"))

    End Sub

End Module