如何：使用 LINQ 篩選查詢結果 (Visual Basic)

文章
05/22/2023

Language-Integrated Query (LINQ) 可讓您輕鬆存取資料庫資訊並執行查詢。

下列範例示範如何使用 Where 子句建立新的應用程式，針對 SQL Server 資料庫執行查詢並按特定值篩選結果。如需詳細資訊，請參閱 Where 子句。

此主題中的範例會使用 Northwind 範例資料庫。如果您的開發電腦上沒有這個資料庫，則可以從 Microsoft 下載中心下載。如需相關指示，請參閱下載範例資料庫。

注意

在下列指示的某些 Visual Studio 使用者介面項目中，您的電腦可能會顯示不同的名稱或位置：您所擁有的 Visual Studio 版本以及使用的設定會決定這些項目。如需詳細資訊，請參閱將 Visual Studio IDE 個人化。

建立與資料庫的連線

在 Visual Studio 中，按一下 [檢視] 功能表上的 [伺服器總管]/[資料庫總管]，以開啟 [伺服器總管]/[資料庫總管]。
在 [伺服器總管]/[資料庫總管] 中，以滑鼠右鍵按一下 [資料連線]，然後按一下 [新增連線]。
指定 Northwind 範例資料庫的有效連線。

新增包含 LINQ to SQL 檔案的專案

在 Visual Studio 的 [檔案] 功能表上，指向 [新增]，然後按一下 [專案]。將 Visual Basic 的 [Windows Forms 應用程式] 選為專案類型。
在 [專案] 功能表上，按一下 [加入新項目]。選取 [LINQ to SQL 類別] 項目範本。
將檔案命名為 northwind.dbml。按一下新增。物件關聯式設計工具 (O/R 設計工具) 會針對 northwind.dbml 檔案開啟。

將要查詢的資料表新增至 O/R 設計工具

在 [伺服器總管]/[資料庫總管] 中，展開與 Northwind 資料庫的連線。展開 [資料表] 資料夾。

如果您已關閉 O/R 設計工具，您可以按兩下稍早新增的 northwind.dbml 檔案，重新開啟設計工具。
按一下 [Customers] 資料表，並將其拖曳至設計工具的左窗格。按一下 [Orders] 資料表，並將其拖曳至設計工具的左窗格。

設計工具會為您的專案建立新的 Customer 和 Order 物件。請注意，設計工具會自動偵測資料表之間的關聯性，並為相關物件建立子屬性。例如，IntelliSense 會顯示 Customer 物件具備 Orders 屬性，適用於與該客戶相關的所有訂單。
儲存變更並關閉設計工具。
儲存您的專案。

新增程式碼以查詢資料庫並顯示結果

從 [工具箱] 中，將 DataGridView 控制項拖曳至專案的預設 Windows Form (Form1)。
按兩下 Form1，將程式碼新增至表單的 Load 的事件。
當您將資料表新增至 O/R 設計工具時，設計工具會為您的專案新增 DataContext 物件。此物件包含存取那些資料表以及針對各個資料表存取個別物件和集合所需的程式碼。專案的 DataContext 物件會依據 .dbml 檔案名稱來命名。以此專案來說，DataContext 物件會命名為 northwindDataContext。

您可以在程式碼中建立 DataContext 的執行個體，並查詢 O/R 設計工具指定的資料表。

將下列程式碼新增至 Load 事件，以查詢作為資料內容屬性公開的資料表。查詢會篩選結果，並只傳回位於 London 的客戶。
```
Dim db As New northwindDataContext

Dim customers_London = From cust In db.Customers
                       Where cust.City = "London"
                       Select cust.CustomerID, cust.CompanyName,
                              OrderCount = cust.Orders.Count,
                              cust.City, cust.Country

DataGridView1.DataSource = customers_London
```
按 F5 可執行專案並檢視結果。

以下是您可以嘗試的一些其他篩選。

Dim companies_H = From cust In db.Customers
                  Where cust.Orders.Count > 0 And
                        cust.CompanyName.StartsWith("H")
                  Select cust.CustomerID, cust.CompanyName,
                         OrderCount = cust.Orders.Count,
                         cust.Country

Dim customers_USA = From cust In db.Customers
                    Where cust.Orders.Count > 15 And
                          cust.Country = "USA"
                    Select cust.CustomerID, cust.CompanyName,
                           OrderCount = cust.Orders.Count,
                           cust.Country

分享方式：

如何：使用 LINQ 篩選查詢結果 (Visual Basic)

建立與資料庫的連線

新增包含 LINQ to SQL 檔案的專案

將要查詢的資料表新增至 O/R 設計工具

新增程式碼以查詢資料庫並顯示結果

另請參閱

更多資源