Udostępnij za pośrednictwem


Porady: sortowanie wyników zapytania za pomocą LINQ (Visual Basic)

Zapytanie zintegrowane z językiem (LINQ) ułatwia uzyskiwanie dostępu do informacji o bazie danych i wykonywanie zapytań.

W poniższym przykładzie pokazano, jak utworzyć nową aplikację, która wykonuje zapytania względem bazy danych programu SQL Server i sortuje wyniki według wielu pól przy użyciu klauzuli Order By . Kolejność sortowania dla każdego pola może być kolejnością rosnącą lub malejącą. Aby uzyskać więcej informacji, zobacz Order By Clause (Klauzula Order By).

W przykładach w tym temacie użyto przykładowej bazy danych Northwind. Jeśli nie masz tej bazy danych na komputerze dewelopera, możesz pobrać ją z Centrum pobierania Microsoft. Aby uzyskać instrukcje, zobacz Pobieranie przykładowych baz danych.

Uwaga

Na komputerze w poniższych instrukcjach mogą być wyświetlane inne nazwy i lokalizacje niektórych elementów interfejsu użytkownika programu Visual Studio. Te elementy są określane przez numer wersji Visual Studio oraz twoje ustawienia. Aby uzyskać więcej informacji, zobacz Personalizowanie środowiska IDE.

Aby utworzyć połączenie z bazą danych

  1. W programie Visual Studio otwórz Eksploratora baz danych Eksploratora/serwera, klikając Eksploratora baz danych Eksploratora/serwera w menu Widok.

  2. Kliknij prawym przyciskiem myszy pozycję Połączenie ions danych w Eksploratorze baz danych Eksploratora/ serwera, a następnie kliknij polecenie Dodaj Połączenie ion.

  3. Określ prawidłowe połączenie z przykładową bazą danych Northwind.

Aby dodać projekt zawierający plik LINQ to SQL

  1. W programie Visual Studio w menu Plik wskaż polecenie Nowy , a następnie kliknij pozycję Projekt. Wybierz pozycję Aplikacja formularzy systemu Windows w języku Visual Basic jako typ projektu.

  2. W menu Project (Projekt) kliknij pozycję Add New Item (Dodaj nowy element). Wybierz szablon elementu KLASY LINQ to SQL.

  3. Nazwij plik northwind.dbml. Kliknij przycisk Dodaj. Dla pliku northwind.dbml jest otwierana Projektant relacyjna (O/R Projektant).

Aby dodać tabele do zapytania do Projektant O/R

  1. W Eksploratorze bazy danych Eksploratora/ serwera rozwiń połączenie z bazą danych Northwind. Rozwiń folder Tables.

    Jeśli zamknięto Projektant O/R, możesz go ponownie otworzyć, klikając dwukrotnie dodany wcześniej plik northwind.dbml.

  2. Kliknij tabelę Customers (Klienci) i przeciągnij ją do lewego okienka projektanta. Kliknij tabelę Orders (Zamówienia) i przeciągnij ją do lewego okienka projektanta.

    Projektant tworzy nowe Customer obiekty i Order dla projektu. Zwróć uwagę, że projektant automatycznie wykrywa relacje między tabelami i tworzy właściwości podrzędne dla powiązanych obiektów. Na przykład funkcja IntelliSense pokaże, że Customer obiekt ma Orders właściwość dla wszystkich zamówień powiązanych z tym klientem.

  3. Zapisz zmiany i zamknij projektanta.

  4. Zapisz projekt.

Aby dodać kod, aby wysłać zapytanie do bazy danych i wyświetlić wyniki

  1. Z przybornika przeciągnij kontrolkę DataGridView do domyślnego formularza systemu Windows dla projektu Form1.

  2. Kliknij dwukrotnie formularz Form1, aby dodać kod do Load zdarzenia formularza.

  3. Po dodaniu tabel do Projektant O/R projektant dodał DataContext do projektu obiekt. Ten obiekt zawiera kod, który musi mieć dostęp do tych tabel, oraz aby uzyskać dostęp do poszczególnych obiektów i kolekcji dla każdej tabeli. DataContext Obiekt projektu ma nazwę na podstawie nazwy pliku dbml. W tym projekcie DataContext obiekt ma nazwę northwindDataContext.

    Możesz utworzyć wystąpienie DataContext obiektu w kodzie i wykonać zapytanie o tabele określone przez Projektant O/R.

    Dodaj następujący kod do zdarzenia, aby wysłać zapytanie do Load tabel, które są uwidocznione jako właściwości kontekstu danych i posortować wyniki. Zapytanie sortuje wyniki według liczby zamówień klientów w kolejności malejącej. Klienci, którzy mają taką samą liczbę zamówień, są porządkowane według nazwy firmy w kolejności rosnącej (wartość domyślna).

    Dim db As New northwindDataContext
    
    Dim q = From cust In db.Customers
            Where cust.Orders.Count > 0
            Select cust.CustomerID, cust.CompanyName,
                   OrderCount = cust.Orders.Count, cust.Country
            Order By OrderCount Descending, CompanyName
    
    DataGridView1.DataSource = q
    
  4. Naciśnij klawisz F5, aby uruchomić projekt i wyświetlić wyniki.

Zobacz też