LAMBDA query to find even elements from Array Collection in VB.Net

New Integer() {23, 56, 78, 11, 9, 1, _
	2, 3, 4, 5, 6, 100, _
	98, 201, 54}.Where(Function(i) i Mod 2 Is 0).ToList().ForEach(Function(i) Console.WriteLine(i))

Result
------
56
78
2
4
6
100
98
54