Gewusst wie: Suchen des minimalen oder maximalen Werts in einem Abfrageergebnis mithilfe von LINQ (Visual Basic)

LINQ (Language Integrated Query) vereinfacht den Zugriff auf Datenbankinformationen und die Ausführung von Abfragen.

Das folgende Beispiel zeigt, wie Sie eine Anwendung erstellen, die Abfragen in einer SQL Server-Datenbank ausführt. Im Beispiel werden die Mindest- und Höchstwerte für die Ergebnisse mithilfe der Klauseln Aggregate und Group By bestimmt. Weitere Informationen finden Sie unter Aggregate-Klausel und Group By-Klausel.

In den Beispielen in diesem Thema wird die Northwind-Beispieldatenbank verwendet. Befindet sich diese Datenbank nicht auf Ihrem Entwicklungscomputer, können Sie sie aus dem Microsoft Download Center herunterladen. Anweisungen hierzu finden Sie unter Herunterladen von Beispieldatenbanken.

Herstellen einer Verbindung mit einer Datenbank

1. Öffnen Sie in Visual Studio Server-Explorer/Datenbank-Explorer, indem Sie im Menü Ansicht auf Server-Explorer/Datenbank-Explorer klicken.

2. Klicken Sie in Server-Explorer/Datenbank-Explorer mit der rechten Maustaste auf Datenverbindungen, und wählen Sie dann Verbindung hinzufügen aus.

3. Geben Sie eine gültige Verbindung mit der Northwind-Beispieldatenbank an.

So fügen Sie ein Projekt hinzu, das eine LINQ to SQL-Datei enthält

1. Zeigen Sie in Visual Studio im Menü Datei auf Neu, und klicken Sie auf Projekt. Wählen Sie Visual Basic Windows Forms Anwendung als Projekttyp aus.

2. Klicken Sie im Menü Projekt auf Neues Element hinzufügen. Wählen Sie die Objektvorlage LINQ to SQL-Klassen.

3. Nennen Sie die Datei northwind.dbml. Klicken Sie auf Hinzufügen. Der Objektrelationale Designer (O/R-Designer) wird für die Datei „northwind.dbml“ geöffnet.

Hinzufügen von Tabellen zu Abfragen im O/R-Designer

1. Erweitern Sie in Server-Explorer/Datenbank-Explorer die Verbindung mit der Northwind-Datenbank. Erweitern Sie den Ordner Tabellen .

   Wenn Sie O/R-Designer geschlossen haben, können Sie das Tool erneut öffnen, indem Sie auf die Datei „northwind.dbml“ doppelklicken, die Sie zuvor hinzugefügt haben.

2. Klicken Sie auf die Tabelle „Customers“, und ziehen Sie sie in den linken Bereich des Designers. Klicken Sie auf die Tabelle „Orders“, und ziehen Sie sie in den linken Bereich des Designers.

   Der Designer erstellt neue Customer- und Order-Objekte für Ihr Projekt. Beachten Sie, dass der Designer automatisch Beziehungen zwischen den Tabellen erkennt und untergeordnete Eigenschaften für verwandte Objekte erstellt. Beispielsweise zeigt IntelliSense an, dass das Customer-Objekt über eine Orders-Eigenschaft für alle Bestellungen verfügt, die einzelnen Kund*innen zugeordnet sind.

3. Speichern Sie Ihre Änderungen, und schließen Sie den Designer.

4. Speichern Sie das Projekt.

Hinzufügen von Code zum Abfragen der Datenbank und Anzeigen der Ergebnisse

1. Ziehen Sie aus der Toolbox ein DataGridView-Steuerelement auf das Windows-Standardformular „Form1“ Ihres Projekts.

2. Doppelklicken Sie auf „Form1“, um dem Load-Ereignis des Formulars Code hinzuzufügen.

3. Wenn Sie O/R-Designer Tabellen hinzugefügt haben, hat der Designer Ihrem Projekt ein DataContext-Objekt hinzugefügt. Dieses Objekt enthält den Code, den Sie benötigen, um auf diese Tabellen sowie auf einzelne Objekte und Auflistungen für jede Tabelle zuzugreifen. Das DataContext-Objekt für Ihr Projekts wird auf Grundlage des Namens der DBML-Datei benannt. Für dieses Projekt hat das DataContext-Objekt den Namen northwindDataContext.

   Sie können eine Instanz von DataContext in Ihrem Code erstellen und die von O/R-Designer angegebenen Tabellen abfragen.

   Fügen Sie dem Load-Ereignis folgenden Code hinzu. Dieser Code fragt die Tabellen ab, die als Eigenschaften Ihres Datenkontexts verfügbar gemacht werden, und bestimmt die Mindest- und Höchstwerte für die Ergebnisse. Im Beispiel wird die Aggregate-Klausel verwendet, um ein einzelnes Ergebnis abzufragen, und die Group By-Klausel, um einen Durchschnitt für gruppierte Ergebnisse anzuzeigen.

   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. Drücken Sie F5, um das Projekt auszuführen und die Ergebnisse anzuzeigen.

Weitere Informationen

• LINQ
• Abfragen
• LINQ to SQL
• DataContext-Methoden (O/R-Designer)