共用方式為

如何：使用 LINQ 尋找查詢結果中的最小或最大值 (Visual Basic)

  • 發行項

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

下列範例顯示如何建立新的應用程式，對 SQL Server 資料庫執行查詢。 範例會使用 Aggregate 和 Group By 子句，決定結果的最小值和最大值。 如需詳細資訊，請參閱 Aggregate 子句 (Visual Basic) 和 Group By 子句 (Visual Basic)。

本主題中的範例使用 Northwind 範例資料庫。 如果您的開發電腦上沒有 Northwind 範例資料庫，可以從 Microsoft 下載中心 (英文) 網站下載。 如需相關說明，請參閱下載範例資料庫。

注意事項注意事項

您的電腦對於下列指示中某些 Visual Studio 使用者介面項目的名稱或位置，可能會顯示不同的資訊：您所擁有的 Visual Studio 版本以及使用的設定會決定這些項目。如需詳細資訊，請參閱＜Visual Studio 中的自訂開發設定＞。

若要建立連接至資料庫

  1. 在 Visual Studio 中，按一下 [檢視] 功能表上的 [伺服器總管]/[資料庫總管]，以開啟 [伺服器總管]/[資料庫總管]。

  2. 以滑鼠右鍵按一下 [伺服器總管]/[資料庫總管] 中的 [資料連接]，然後按一下 [加入連接]。

  3. 指定至 Northwind 範例資料庫的有效連接。

若要加入內含 LINQ to SQL 檔案的專案

  1. 在 Visual Studio 的 [檔案] 功能表上，指向 [新增]，然後按一下 [專案]。 選取 Visual Basic [Windows Form 應用程式] 為專案類型。

  2. 在 [專案] 功能表上，按一下 [加入新項目]。 選取 [LINQ to SQL 類別] 項目範本。

  3. 將檔案命名為 northwind.dbml。 按一下 [加入]。 系統會針對 northwind.dbml 檔案開啟物件關聯式設計工具 (O/R 設計工具)。

若要將資料表加入至 O/R 設計工具的查詢

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

    如果您關閉了 O/R 設計工具，可以按兩下您稍早加入的 northwind.dbml 檔案以重新開啟。

  2. 按一下 [Customers] 資料表，將它拖曳至設計工具的左窗格。 按一下 [Orders] 資料表，將它拖曳至設計工具的左窗格。

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

  3. 儲存變更並關閉設計工具。

  4. 儲存您的專案。

若要加入程式碼以查詢資料庫並顯示結果

  1. 從 [工具箱] 將 DataGridView 控制項拖曳至專案的預設 Windows Form 上 (Form1)。

  2. 按兩下 Form1，將程式碼加入至表單的 Load 事件。

  3. 當您將資料表加入至 O/R 設計工具時，設計工具會為專案加入 DataContext 物件。 本物件內含的程式碼，您必須擁有才能存取這些資料表，以及個別物件和每一個資料表的集合。 專案的 DataContext 物件是根據 .dbml 檔案的名稱命名的。 在這個專案中，DataContext 物件命名為 northwindDataContext。

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

    將下列程式碼加入至 Load 事件。 此程式碼會查詢公開 (Expose) 為資料內容之屬性的表格，並且決定結果的最小值和最大值。 這個範例會使用 Aggregate 子句查詢單一結果，並使用 Group By 子句顯示群組結果的平均值。

    Dim db As New northwindDataContext

Dim minimumOrders = Aggregate cust In db.Customers
                    Where cust.City = "London"
                    Into Min(cust.Orders.Count)

MsgBox("Minimum Orders from a London Customer: " & minimumOrders)

Dim maximumOrdersByCountry = From cust In db.Customers
                             Group By cust.Country
                               Into MaxOrders = Max(cust.Orders.Count)

DataGridView1.DataSource = maximumOrdersByCountry

  4. 按下 F5 執行專案並檢視結果。

請參閱

工作

逐步解說：建立 LINQ to SQL 類別 (O/R 設計工具)

概念

DataContext 方法 (O/R 設計工具)

其他資源

Visual Basic 中的 LINQ

查詢 (Visual Basic)

LINQ to SQL [LINQ to SQL]