Imports System
Imports System.Linq
Public Class Program
Public Shared Sub Main()
Dim arr As Integer() = {3, 7, 0, 11, 89, 30, 99, 40, 50, 26}
Dim X As Integer = 9, Y As Integer = 40
Dim result = From number In arr
Where number >= X AndAlso number <= Y
Select number
For Each num In result
Console.WriteLine(num)
Next
End Sub
End Class
' run:
'
' 11
' 30
' 40
' 26
'