Поделиться через


Практическое руководство. Поиск минимального или максимального значения в результатах запроса с помощью LINQ (Visual Basic)

Language-Integrated запрос (LINQ) упрощает доступ к базе данных и выполнение запросов.

В следующем примере показано, как создать приложение, которое выполняет запросы к базе данных SQL Server. В примере минимальные и максимальные значения результатов определяются с помощью операторов Aggregate и Group By. Дополнительные сведения см. в агрегатном предложении и предложении GROUP BY.

В примерах в этой статье используется пример базы данных Northwind. Чтобы получить базу данных, см. раздел Загрузка образцов баз данных.

Замечание

На компьютере могут отображаться различные имена или расположения для некоторых элементов пользовательского интерфейса Visual Studio в следующих инструкциях. Выпуск Visual Studio, который у вас есть, и параметры, которые вы используете, определяют эти элементы. Дополнительные сведения см. в разделе Персонализация интегрированной среды разработки.

Создание подключения к базе данных

  1. В Visual Studio откройте Обозреватель серверов/Database Explorer, выбрав Обозреватель серверов/Database Explorer в меню Вид.

  2. Щелкните правой кнопкой мыши на Подключения к данным в обозревателе серверов и/обозревателе баз данных, а затем выберите Добавить подключение.

  3. Укажите допустимое подключение к образцовой базе данных Northwind.

Добавление проекта, содержащего файл LINQ to SQL

  1. В Visual Studio в меню файл выберите пункт Создать и щелкните Project. Выберите Visual Basic Windows Forms Application в качестве типа проекта.

  2. В меню проекта щелкните Добавить Новый Элемент. Выберите шаблон элемента LINQ to SQL Classes.

  3. Назовите файл northwind.dbml. Нажмите кнопку Добавить. Конструктор реляционных объектов (конструктор O/R) открыт для файла northwind.dbml.

Добавление таблиц для запроса в конструктор O/R

  1. В обозревателе серверов /Обозреватель баз данныхразверните подключение к базе данных Northwind. Разверните папку Таблицы.

    Если вы закрыли конструктор O/R, его можно повторно открыть, дважды щелкнув файл northwind.dbml, который вы добавили ранее.

  2. Щелкните таблицу "Клиенты" и перетащите её в левую панель конструктора. Щелкните таблицу "Заказы" и перетащите ее в левую панель конструктора.

    Конструктор создает новые объекты 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 событие. Этот код запрашивает таблицы, предоставляемые в качестве свойств контекста данных, и определяет минимальные и максимальные значения результатов. В примере используется предложение 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, чтобы запустить проект и просмотреть результаты.

См. также