Imports System
Imports System.Linq
Public Class Program
Public Shared Sub Main()
Dim arr = New Integer() {1, 2, 3, 4, 5, 6}
Dim add1 As Func(Of Integer, Integer) = Function(x) x + 1
Dim square As Func(Of Integer, Integer) = Function(x) x * x
Dim result = arr.[Select](add1).[Select](square)
For Each r In result
Console.WriteLine(r)
Next
End Sub
End Class
' run:
'
' 4
' 9
' 16
' 25
' 36
' 49
'