With DataGridView1
			.AutoGenerateColumns = False
 
			Dim col1 As New DataGridViewTextBoxColumn()
			col1.DataPropertyName = "CustomerID"
			col1.HeaderText = "ID"
 
			Dim col2 As New DataGridViewTextBoxColumn()
			col2.DataPropertyName = "CompanyName"
			col2.HeaderText = "Firma"
			col2.DefaultCellStyle.Format = "..."
 
			With .Columns
				.Add(col1)
				.Add(col2)
			End With
 
			Using ctx As New NorthwindDataContext()
				.DataSource = (From c In ctx.Customers _
					  Where c.Country = "Germany" _
					  Select c.CustomerID, c.CompanyName).ToList()
			End Using
 
		End With

Ralf