방법: LINQ를 사용하여 데이터 개수, 합 또는 평균 계산(Visual Basic)

아티클
03/15/2024

LINQ(언어 통합 쿼리)를 사용하면 데이터베이스 정보에 쉽게 액세스하고 쿼리를 실행할 수 있습니다.

다음 예제에서는 SQL Server 데이터베이스에 쿼리를 수행하는 새 애플리케이션을 만드는 방법을 보여 줍니다. 샘플은 Aggregate 및 Group By 절을 사용하여 결과의 개수, 합계 및 평균을 계산합니다. 자세한 내용은, Aggregate 절과 Group By 절을 참조하세요.

이 항목의 예에서는 Northwind 샘플 데이터베이스를 사용합니다. 이 데이터베이스가 개발 컴퓨터에 없는 경우 Microsoft 다운로드 센터에서 다운로드할 수 있습니다. 지침은 샘플 데이터베이스 다운로드를 참조하세요.

참고 항목

일부 Visual Studio 사용자 인터페이스 요소의 경우 다음 지침에 설명된 것과 다른 이름 또는 위치가 시스템에 표시될 수 있습니다. 이러한 요소는 사용하는 Visual Studio 버전 및 설정에 따라 결정됩니다. 자세한 내용은 IDE 개인 설정을 참조하세요.

데이터베이스에 대한 연결을 만들려면

Visual Studio에서 보기 메뉴의 서버 탐색기/데이터 베이스 탐색기에 있는 서버 탐색기/데이터베이스 탐색기를 엽니다.
서버 탐색기/데이터베이스 탐색기에서 데이터 연결을 마우스 오른쪽 단추로 클릭한 다음, 연결 추가를 클릭합니다.
Northwind 샘플 데이터베이스에 대한 유효한 연결을 지정합니다.

LINQ to SQL 파일이 포함된 프로젝트를 추가하는 방법은 다음과 같습니다.

Visual Studio의 파일 메뉴에서 새로 만들기를 가리킨 다음 프로젝트를 클릭합니다. 프로젝트 형식으로 Visual Basic Windows Forms 애플리케이션을 선택합니다.
프로젝트 메뉴에서 새 항목 추가를 클릭합니다. LINQ to SQL 클래스 항목 템플릿을 선택합니다.
파일 이름을 northwind.dbml로 지정합니다. 추가를 클릭합니다. northwind.dbml 파일에 대한 개체 관계형 디자이너(O/R 디자이너)가 열립니다.

O/R 디자이너에 쿼리할 테이블 추가하는 방법은 다음과 같습니다.

서버 탐색기/데이터베이스 탐색기에서 Northwind 데이터베이스에 대한 연결을 확장합니다. Tables 폴더를 확장합니다.

O/R 디자이너를 닫은 경우 이전에 추가한 northwind.dbml 파일을 두 번 클릭하여 다시 열 수 있습니다.
Customers 테이블을 클릭하고 디자이너의 왼쪽 창으로 끌어 놓습니다. Orders 테이블을 클릭하고 디자이너의 왼쪽 창으로 끌어 놓습니다.

디자이너는 프로젝트의 Customer 개체와 Order 개체를 새로 만듭니다. 디자이너는 테이블 간의 관계를 자동으로 검색하여 관련 개체의 자식 속성을 만듭니다. 예를 들어 IntelliSense는 Customer 개체에는 해당 고객과 관련 있는 모든 주문에 Orders 속성이 있음을 보여줍니다.
변경 내용을 저장하고 디자이너를 닫습니다.
프로젝트를 저장합니다.

데이터베이스를 쿼리하고 결과를 표시하는 코드를 추가하는 방법은 다음과 같습니다.

도구 상자에서 DataGridView 컨트롤을 프로젝트 Form1의 기본 Windows Form으로 끕니다.
Form1을 두 번 클릭하여 코드를 양식의 Load 이벤트에 추가합니다.

사용자가 O/R 디자이너에 테이블을 추가할 때 디자이너는 프로젝트에 DataContext 개체를 추가했습니다. 이 개체에는 해당 테이블에 액세스하고 각 테이블의 개별 개체 및 컬렉션에 액세스하는 데 필요한 코드가 포함되어 있습니다. 프로젝트의 DataContext 개체 이름은 .dbml 파일 이름을 기준으로 지정됩니다. 이 프로젝트의 경우 DataContext 개체의 이름은 northwindDataContext입니다.

코드에 DataContext의 인스턴스를 만들어 O/R 디자이너가 지정한 테이블을 쿼리할 수 있습니다.

Load 이벤트에 다음 코드를 추가하여 DataContext 속성으로 노출되는 테이블을 쿼리하고 결과의 개수, 합계 및 평균을 계산합니다. 샘플에서는 단일 결과에 대한 쿼리에는 Aggregate 절을 사용하고, 그룹화된 결과의 평균 확인에는 Group By 절을 사용합니다.

Dim db As New northwindDataContext
Dim msg = ""

Dim londonCustomerCount = Aggregate cust In db.Customers
                          Where cust.City = "London"
                          Into Count()
msg &= "Count of London Customers: " & londonCustomerCount & vbCrLf

Dim averageOrderCount = Aggregate cust In db.Customers
                        Where cust.City = "London"
                        Into Average(cust.Orders.Count)
msg &= "Average number of Orders per customer: " &
       averageOrderCount & vbCrLf

Dim venezuelaTotalOrders = Aggregate cust In db.Customers
                           Where cust.Country = "Venezuela"
                           Into Sum(cust.Orders.Count)
msg &= "Total number of orders from Customers in Venezuela: " &
       venezuelaTotalOrders & vbCrLf

MsgBox(msg)

Dim averageCustomersByCity = From cust In db.Customers
                             Group By cust.City
                             Into Average(cust.Orders.Count)
                             Order By Average

DataGridView1.DataSource = averageCustomersByCity

'Another way to grab the count and sum

londonCustomerCount = (From cust in db.Customers
                       Where cust.City = "London").Count()

venezuelaTotalOrders = (From cust in db.Customers
                        Where cust.Country = "Venezuela"
                        Select cust.Orders).Sum()

F5 키를 눌러 프로젝트를 실행하고 결과를 봅니다.

다음을 통해 공유