Code: Select all
persons = From p In db.Persons, a In db.Addresses _
Where p.Id = a.PersonId _
Order By p.Id _
Select New With {p.EmailAddress, p.LastName, p.FirstName, a.Id, a.Phone1, _
.PersonId = p.Id, .Department = p.Department.Name, p.Title}
How can i achieve this in VB?