Mega Code Archive

 

Categories / VB.Net / LINQ

 

Select by object id

Imports System.Collections.Generic Imports System.Linq Imports System.Runtime.CompilerServices Public Class Person     Public ID As Integer     Public IDRole As Integer     Public LastName As String     Public FirstName As String End Class Module Module1     Sub Main()         Dim people As New List(Of Person)(New Person() { _             New Person With {.ID = 1, .IDRole = 1, .LastName = "A", .FirstName = "Brad"}, _             New Person With {.ID = 2, .IDRole = 2, .LastName = "G", .FirstName = "Tom"} _         })         Dim query = From p In people Where p.ID = 1 Select p     End Sub End Module