Option Strict On

Imports System

Imports System.Linq

Public Module Module1

    Public Sub Main()

        'Declare a collection to store some numbers

        Dim values() As Integer = {1, 2, 3, 4, 5, 6, 7, 8, 9, 10}

​

        'Loop through each value WHERE the current value is less than 5

        For Each value As Integer In (From i As Integer In values Where i < 5)

            Console.WriteLine(value)

        Next

    End Sub

End Module