Imports System

Imports System.Linq

Public Module Module1

    Class MyTestC

        public sub new(_Name as String, _Age as Int32)

            Name = _name

            Age = _Age

        end sub

        public Name as String

        public Age as Int32

    end Class

    Public Sub Main()

        dim myInst as MyTestC() = {

            new MyTestC("Josh", 101),

            new MyTestC("Peter", 102),

            new MyTestC("Josh", 103)

        }

        dim queryResult = From inst In myInst Where inst.Age = 101

        Console.WriteLine(queryResult(0).Name)

    end sub

​

​

​

​

End Module