Imports System

Imports System.Linq

Imports System.Collections.Generic

​

Public Module Module1

    Public Sub Main()

        Dim people as List(Of String) = New List(Of String) ({"Albert", "Alfred","Rudholf", "Cyntia"})

        dim result as IEnumerable(Of String) = people.Where(function(p) p.Contains("Al"))

        For Each person as string in result

            Console.WriteLine(person)

        Next

    End Sub

End Module