Dim Varx

Dim Varx As Integer

Dim Varx, Vary As Integer

Those people who think they know everything are a great annoyance to those of us who do - Isaac Asimov

Dim ctx as New NorthwindDataContext()
Dim gerCust = From c in ctx.Customers _
              Where c.City = "Germany"
              Select New With {.ID = c.CustomerID, .Name = c.CompanyName, _
                c.Orders}

Ralf

Those people who think they know everything are a great annoyance to those of us who do - Isaac Asimov

Ralf